With the new era of mobile computing, smartphones and tablets, wireless communications and cloud services, the USDA sought to take advantage of a mobilized workforce and the blurring lines between personal and corporate computing resources.
Private Sub Command2_Click() DoCmd.OutputTo acOutputQuery, "Tickers for Exporting", acFormatXLSX, "\\nor-gs2-dc01\Redirected\xxxx\Desktop\Tickers for Exporting.xlsx", False Dim xlObj As Object Set xlObj = CreateObject("Excel.Application") xlObj.Workbooks.Open "\\nor-gs2-dc01\Redirected\xxxx\Desktop\Tickers for Exporting.xlsx" With xlObj .activeworkbook.SaveAs "\\nor-gs2-dc01\Redirected\xxxx\Desktop\Tickers for Exporting.xls" End With xlObj.Quit Set xlObj = Nothing End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Excel 2016 - How to prevent inserted column from inheriting attributes of column to the left||8||14|
|Command button to lock and unlock sheet to protect formulas in Excel||6||21|
|Excel Macro causing an incorrect entry on first line||5||13|
|chrome says SHA256 algorithm is weak even after i configure my website to use SHA256 certificate||5||34|