打开文件后保存Excel文件名

Question

在Excel中，我正在编写一个宏来移动和格式化两个文件之间的数据。我首先打开第一个文件并运行一个允许您选择文件的宏。

我正在使用以下代码打开文件：

  

myFileName = Application.GetOpenFilename（filefilter：=“All Files，。”，Title：=“All Files”）

然后我用这段代码跟着它：

  

Workbooks.Open文件名：= myFileName

稍后在代码模块中，我想在这个新打开的文件和从内部运行宏的文件之间复制和过去。目前我不得不硬编码他们的名字：

  

窗（ “data.xlsx”）。激活

如何将新打开的文件的名称存储在字符串中？如何将我所在的excel文件的名称转换为字符串？

由于

Answer 1

在打开第二个工作簿之前，将当前工作簿的名称分配给变量：

nameFirstWorkbook = ActiveWorkbook.Name

您已从打开文件对话框中获取第二个工作簿的名称。