今天這個問題是
如何用"EXCEL用VBA去抓另一個EXCEL檔的儲存格"
看起來複雜
但處理好了以後
可以解好多問題
比如現在我有一堆格式一致的EXCEL檔(1.xlsb、2.xlsb.......n.xlsb)
我要把每一個xlsb的儲存格a1存在index.xlsb的a1.....an裡
製作方法:
1.先開啟index.xlsb和1.xlsb兩個檔案
2.再錄製巨集取得index.xlsb的a1上=1.xlsb ==>2016版得到的原始碼
ActiveCell.FormulaR1C1 = "=[1.xlsb]工作表1!R4C8"
3.再用FOR迴圈把整個程式串起來即可。
Sub pro()
k = ThisWorkbook.Path 'index.xlsb的路徑
For i = 1 To 100 '假設有100個xlsb
Range("A" & i).Formula = "='" & k & "\[" & i & ".xlsb]工作表1'!R1C1" '問題的解答
Next
End Sub
投資要靠自己
聽明牌就是把錢送別人
沒有留言:
張貼留言
歡迎留言<