有没有一种方法可以根据特定单元格的值更改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.........