我正在尝试按下按钮,当按下提示用户打开csv文件,然后在csv文件上自动执行一堆其他操作。这是我目前正在使用的代码:
Sub MainMacro()
Dim fNameAndPath As Variant
fNameAndPath = Application.GetOpenFilename(FileFilter:="Excel Files (*.csv), *.csv", Title:="Select File To Be Opened")
If fNameAndPath = False Then Exit Sub
Workbooks.Open Filename:=fNameAndPath
'Sheets.Add After:=Sheets(Sheets.Count)
'ActiveSheet.name = fNameAndPath
Call Macro1
Call Macro2
Call Macro3
Call Macro4
End Sub
把它打开csv文件,我希望它在选项卡中打开,这样Marco1 Marco2...
可以执行各自的任务。因此,按钮将在用户随后加载的新活动工作表上执行所有MainMacro()。
答案 0 :(得分:2)
此代码将打开csv,然后将工作表复制到原始工作簿,以便您随意使用。在将工作表复制到目标工作簿时,复制的工作表也将激活。
AdminContact
当然,根据Macro1-4实际执行的操作,可能更容易在不同的工作簿中打开它并只针对它执行宏?