※ 引述《slowrock (大頭源)》之銘言：
※ 引述《fumizuki (矇面加菲獅)》之銘言：
: ※ 引述《tyrone208 (～我是幸運鬼～)》之銘言：
: : 如題 我想要選取不同檔案中的儲存格
: : 請問該怎麼做呢？
: : ex: A檔案的某一個工作表 要選取B檔案的某一個儲存格內容
: : 請問可行嗎？
: : 謝謝～
: 你要的應該是這樣吧？
: Application.Workbooks("Book1").Worksheets("Sheet2").Range("B2").value = "VBA"
: ￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣ ￣￣￣￣￣￣￣￣￣￣ ￣￣￣￣￣￣￣￣￣
: 活頁簿("工作表標題") 工作表("工作表標題") 儲存格("儲存格名稱")
小弟也來貢獻一下：
Sub LinkToOtherBook()
'取得工作簿A資料的方法,假設此句集放在工作簿B,選取要取得資料之工作表：
' 例１、如果工作簿A已開啟
Range("B1").formula = "=[WorkbookA.xls]Sheet1!B1"
' 例2、如果工作簿A未開啟
Range("A1").formula = _
"='C:\[WorkbookA.xls]Sheet2'!B5"
' 例3、如果工作簿A未開啟，且要取得多於一個單元格的資料
Range("A5:C7").formulaArray = "='C:\[WorkbookA.xls]Sheet2'!B2:D4"
End Sub
請問若是例三的方式
但我檔名和路徑都用自定的變數代替
如:
Dim myFile as string
Dim FileName as string
FileName = Range("J1")
myFile = ThisWorkbook.Path & "\" & FileName & ".xls"
Range("a1:b3").FormulaArray =
"='ThisWorkbook.path & "\" & "\" & FileName & ".xls"sheet1 '!a1:b3"
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
請問這段指定路徑和檔名要怎麼寫才正確呢?
想自學的新手困擾好久
感謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.115.150.12
※ 編輯: slowrock 來自: 218.167.151.156 (11/12 20:02)
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 122.201.219.44