文件path更改取决于单元格值(VBA)

我认为这将是非常基本的,我试图引用多个线程( 如何使用VBA单元格中的文件path? )。 但似乎无法得到任何代码工作没有任何问题。

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

所有的文件保存在C:\ ***** \ ***** \ Documents \我的工作,我想打开文件夹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 

试试这个( 未经testing

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

File位置和File是variables。 像这样对待他们。 任何你用引号括起来的东西都会被认为是一个string。

在上面的代码中将Sheet1更改为相关工作表。 即文件名称所在的工作表。