Excel VBA-浏览并打开文件，将打开的文件粘贴到宏表中答案

【问题标题】：Excel VBA- Browse and open the files, paste the open files in macro sheetExcel VBA-浏览并打开文件，将打开的文件粘贴到宏表中
【发布时间】：2019-12-03 16:23:30
【问题描述】：

我正在尝试自动化，通过搜索按钮浏览文件并打开文件，它应该粘贴在我的宏表的下一张表中。请帮忙在 excel vba 中做。

我尝试打开两个文件，我需要比较这些文件。

【问题讨论】：

澄清问题： 1. 您是否每次都比较相同的两个文件？ 2. 是否要将这两个文件的内容复制/粘贴到您的宏工作簿中，复制到现有的两个工作表中？还是两张新床单？ 3. 你想以什么方式比较它们？
我需要将这两个文件的内容复制/粘贴到我的宏工作簿中。通过浏览按钮，我只需要选择路径并将文件粘贴到宏工作簿中。

标签： excel vba

【解决方案1】：

此代码将让您浏览到选定的文件，然后打开它

Sub OpenFile()
Dim strFileToOpen As Variant

strFileToOpen = Application.GetOpenFilename _
(Title:="Please choose a file to open", _
FileFilter:="Excel Files *.xls* (*.xls*),")

If strFileToOpen = False Then
    MsgBox "No file selected.", vbExclamation, "Sorry!"
    Exit Sub
Else
    Workbooks.Open Filename:=strFileToOpen
End If

End Sub

这将使您入门。打开后，您可以编写代码将工作表复制到宏文件中。

【讨论】：