請問版上大大
在Excel裡想用VBA抓相對路徑的資料該怎麼寫(同資料夾但不同層的檔案)
知道用絕對路徑怎麼寫，可是檔案給別人的時候可能就沒辦法跑了
所以想改用相對路徑寫，
Sub s()
Dim i As Integer
For i = 1 To 46
Sheets("工作表1").Range("A" & i & ":A" & i).Formula =
"='C:\Users\資料夾\VBA用\[" & i & ".xlsx]綜合報表'!$A$3"
Sheets("工作表1").Range("B" & i & ":B" & i).Formula =
"='C:\Users\資料夾\VBA用\[" & i & ".xlsx]綜合報表'!$E$3"
Next i
End Sub
C:\Users\資料夾\VBA用\ <

.\\[" & i & ".xlsx]綜合報表'!$A$3"".\[" & i & ".xlsx]綜合報表'!$A$3"

用萬用方法試試 ./是本目錄 ../是上層目錄

用Application.FileDialog(msoFileDialogFolderPicker)讓使者自己指定資料夾https://goo.gl/z04PC9