我有一个在线报告,当下载时自动打开为* .csv文件 . 然后我打开另一个包含各种宏的Excel工作簿,并希望将整个下载的工作表(sheet1)复制到我的主工作簿上,作为新工作表或现有的名为“DATA”的空白工作表 .
我的问题是引用打开的下载工作表,因为每次下载时名称都不同 . 我的首选是不保存下载的工作簿,然后复制,因为我只是在完成后删除文件 .
任何帮助引用下载的文件并激活它将不胜感激 .
我今天一直在考虑 Application.RecentFiles 并想知道它是否适用于此 . 假设csv是最近打开的文件,即它位于Home> Recent列表的顶部:
Application.RecentFiles
Sub ActivateMostRecentOpened() Dim WbName As String With Application WbName = Workbooks(.RecentFiles(1).Name, InStrRev(.RecentFiles(1).Name, .PathSeparator) + 1).Activate End With End Sub
1 回答
我今天一直在考虑
Application.RecentFiles
并想知道它是否适用于此 . 假设csv是最近打开的文件,即它位于Home> Recent列表的顶部: