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

看板Office作者時間13年前 (2012/11/17 09:12), 編輯推噓0(0011)
留言11則, 2人參與, 最新討論串1/1
軟體: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

11/17 20:23, , 1F
11/17 20:23, 1F

11/17 20:23, , 2F
2.可試cells(row,column)
11/17 20:23, 2F

11/17 20:55, , 3F
真的很感謝soyoso版友,獲益良多
11/17 20:55, 3F

11/17 22:46, , 4F
不好意思,關於1,我的sheet不一定都叫TFBGA, 是很多不同
11/17 22:46, 4F

11/17 22:47, , 5F
名稱的sheet,我想讓vba跑的時候把該excel的sheet跑遍,
11/17 22:47, 5F

11/17 22:49, , 6F
應該再如何修改?(ex.sheet名稱為 A,12,efe,#等亂七八糟
11/17 22:49, 6F

11/17 22:50, , 7F
的命名,且每個excel的sheet數目也不一致),謝謝
11/17 22:50, 7F

11/17 23:10, , 8F
11/17 23:10, 8F

11/18 00:07, , 9F
請問是改成 xlSht = xlWrk.Sheets("sht.Select") 嗎?
11/18 00:07, 9F

11/18 00:26, , 10F
11/18 00:26, 10F

11/18 00:38, , 11F
大感謝,試成功了
11/18 00:38, 11F
文章代碼(AID): #1GfkHp1k (Office)
文章代碼(AID): #1GfkHp1k (Office)