Board logo

標題: [發問] EXCEL抓取不同檔案的SHEET [打印本頁]

作者: 801118    時間: 2017-7-9 17:18     標題: EXCEL抓取不同檔案的SHEET

想問請一下   因為我工作需要做些考核統計

例如每一個月每個人都有多種品項考核的 (例如有出勤的考核 工作表現的考核  等多頁SHEET.)

之後要把半年度的考核  做個半年度的總合

要怎樣才能跨檔案快速抓取作加總   因為我只會 =[A.xlsx]工作表1!$A$1   
但總共超過500個要手動輸入會暈倒   又不能向下拉

喜望有高手可以幫我    因為小弟EXCEL真的不行   所以可以的話可以詳細說一下
作者: cjw    時間: 2017-8-11 10:34

因您的問題不是很詳細,所以不知如何解答,試著將=[A.xlsx]工作表1!$A$1   
改成=[A.xlsx]工作表1!A1向下拉試看看!
作者: 801118    時間: 2017-8-23 09:33

回復 2# cjw

這方法不行

痾  抱歉表達的不清楚
像我有7個檔案分別黨名1~7

7號黨sheet1要抓取分別1~6 sheet1裡的某一直列範圍裡的檔案

因為要抓取好多直列  所以想問能接把分別1~6的sheet1檔案  連動抓取到檔案7裡(這樣就可以用下拉)

不知道這樣說明懂不懂(表達弱弱的)
作者: georgehu    時間: 2017-8-25 11:44

提供您一段程式給您參考

Dim sData, TData As Workbook
Dim sSt As WorkSheet

'ChDir WPath

ChDir Application.ActiveWorkbook.Path
Set sData = Workbooks.Open(SourceData)
sData.Activate
Set sSt = sData.Worksheets(1)
作者: JasonChen576    時間: 2018-1-29 10:48

A列                        B列
活頁簿編號        公式
1                        =INDIRECT("[活頁簿"& A2 & ".xlsx]工作表1!$A$1")
2                        =INDIRECT("[活頁簿"& A3 & ".xlsx]工作表1!$A$1")
3                        =INDIRECT("[活頁簿"& A4 & ".xlsx]工作表1!$A$1")




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)