宏：如何浏览excel文件和读取数据

Question

我正在分3个步骤编写一个宏脚本：

通过浏览读取excel文件 - 传输到xml格式 - 通过浏览将xml文件导出到某个路径。 我知道如何通过浏览alrady导出。

Set objShell = CreateObject("Shell.application")
Set objFolder = objShell.BrowseForFolder(0, "choose the path you want to export the xml file", 0, 0)

但这个是浏览文件夹。

如何浏览文件？如果我想通过浏览导入Excel数据？

THX

Answer 1

要打开“打开文件”对话框，我使用以下内容：

FileOpenName = Application.GetOpenFilename(fileFilter:="All files (*.*), *.*")

然后你需要关注以打开文件

Open FileOpenName For (Binary|Write) as #1
   'Do writing operations here
Close #1