excel - 有没有办法根据特定单元格的值更改 VBA 代码？

Question

假设单元格 A1 包含一个文件夹地址。
现在我想要一个 VBA 代码，它可以选择这个文件夹地址并将其用作运行整个代码的路径。
这是我的 VBA 代码:

Sub GetSheets()
    Path = "" 'Folder address has to be added here

    File name = Dir(Path & "*.xls")
    Do while.........

End Sub

我正在寻找一个 VBA 代码，它从单元格 A1 中选择值并添加到路径中。

Answer 1

根据您的代码，这应该会有所帮助。

Path = Range("A1").value
File name = Dir(Path & "*.xls") Do while.........