vba - 文件路径更改取决于单元格值 (VBA)

Question

我认为这将是非常基本的，我试图引用多个线程(How to use file path from a cell in VBA?)。但似乎无法让任何代码正常工作。

基本上我想做的是根据单元格的输入打开不同的 XL 文件，所有文件都在同一个位置(文件夹)，但显然名称会改变。所以在单元格 C3 中我写了一个数字，例如12345，我希望它在一个常量文件夹中查找相应的命名 XL 文档。

所有文件都保存在C:\*****\*****\Documents\My Work，我要打开文件夹C:\*****\*****\Documents\My Work\12345.XLS，其变化取决于 C3。

这是我尝试使用的代码:

Sub Macro()
Dim Filelocation As String
Dim File As String
Dim Filepathfull As String
Filelocation = "C:\ ***** \ *****\Documents\My Work"
File = "C3"
Filepathfull="Filelocation & "\" & "File" & ".xlsx"
Workbooks.Open(Filename:=Filepathfull)
End Sub

在此期间我会继续寻找!提前感谢您的帮助。

编辑答案:

Sub Macro()
Dim Filelocation As String
Dim File As String
Dim Filepathfull As String
Filelocation = "C:\ ***** \ *****\Documents\My Work"
File = "C3"
Filepathfull = Filelocation & "\" & Range(File).Value & ".xlsx"
Workbooks.Open (Filepathfull)
End Sub

Answer 1

试试这个(未经测试)

Filepathfull= Filelocation & "\" & Sheets("Sheet1").Range(File).Value & ".xls"

Filelocation和 File是变量。这样对待他们。您放在引号中的任何内容都将被视为字符串。

在上面的代码更改 Sheet1到相关的表格。即文件名所在的工作表。