[算表] VBA 抓取同excel的不同sheet資料

[Cidolfas ()]

軟體:excel

版本:2003

剛學vba，想請教2個問題。

1.我目前能從不同excel抓取固定位置的資料，但是我現在每個excel有不等數量的sheet，
且每個sheet名稱不同，若我想一次把不同的sheet(下面的(TFBGA處)的特定位置抓完，
請問應如何寫？

2.如果我想跳欄去選擇資料，請問是否能把欄位的A,B,C,D...轉換成數字，
讓我可以迴圈方式來做挑選(下面D處)

以下是我的原始檔

Sub 從不同excel抓取固定欄位的值()
  For I = 1 To 50
    Sheets("Sheet1").Range("A" & I & ":A" & I).Formula
    = "='C:\test\[A(" & I & ").xls]TFBGA'!D16"
  Next I
End Sub

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 114.25.180.37
→ soyoso:1.http://goo.gl/gW7Jq 試試
→ soyoso:2.可試cells(row,column)
→ Cidolfas:真的很感謝soyoso版友，獲益良多
→ Cidolfas:不好意思，關於1，我的sheet不一定都叫TFBGA, 是很多不同
→ Cidolfas:名稱的sheet,我想讓vba跑的時候把該excel的sheet跑遍,
→ Cidolfas:應該再如何修改？(ex.sheet名稱為 A,12,efe,#等亂七八糟
→ Cidolfas:的命名，且每個excel的sheet數目也不一致)，謝謝
→ soyoso:http://goo.gl/exG6m 試試
→ Cidolfas:請問是改成 xlSht = xlWrk.Sheets("sht.Select") 嗎？
→ soyoso:http://goo.gl/e3tlX 試試
→ Cidolfas:大感謝，試成功了