註冊
登錄
首頁
論壇版規
禁止列表
說明
地圖
數位書香
私人消息 (0)
公共消息 (0)
論壇任務 (0)
系統消息 (0)
好友消息 (0)
帖子消息 (0)
麻辣家族討論版版
»
Office不分區
» EXCEL抓取不同檔案的SHEET
返回列表
下一主題
上一主題
發帖
[發問]
EXCEL抓取不同檔案的SHEET
801118
發短消息
加為好友
801118
當前離線
UID
13989
帖子
2
主題
1
精華
0
積分
3
金錢
3
點名
0
作業系統
window7
軟體版本
office2010
閱讀權限
10
在線時間
1 小時
註冊時間
2013-6-2
最後登錄
2017-11-2
小學生
帖子
2
主題
1
精華
0
積分
3
點名
0
作業系統
window7
軟體版本
office2010
閱讀權限
10
註冊時間
2013-6-2
最後登錄
2017-11-2
1
#
跳轉到
»
倒序看帖
打印
字體大小:
t
T
發表於 2017-7-9 17:18
|
只看該作者
[發問]
EXCEL抓取不同檔案的SHEET
EXCEL
,
Excel
想問請一下 因為我工作需要做些考核統計
例如每一個月每個人都有多種品項考核的 (例如有出勤的考核 工作表現的考核 等多頁SHEET.)
之後要把半年度的考核 做個半年度的總合
要怎樣才能跨檔案快速抓取作加總 因為我只會 =[A.xlsx]工作表1!$A$1
但總共超過500個要手動輸入會暈倒 又不能向下拉
喜望有高手可以幫我 因為小弟EXCEL真的不行 所以可以的話可以詳細說一下
收藏
分享
cjw
發短消息
加為好友
cjw
當前離線
UID
26380
帖子
6
主題
0
精華
0
積分
19
金錢
19
點名
0
作業系統
windows xp
軟體版本
office 2003
閱讀權限
10
性別
男
來自
台灣台中
在線時間
11 小時
註冊時間
2016-10-24
最後登錄
2017-8-22
小學生
帖子
6
主題
0
精華
0
積分
19
點名
0
作業系統
windows xp
軟體版本
office 2003
閱讀權限
10
性別
男
來自
台灣台中
註冊時間
2016-10-24
最後登錄
2017-8-22
2
#
發表於 2017-8-11 10:34
|
只看該作者
因您的問題不是很詳細,所以不知如何解答,試著將=[A.xlsx]工作表1!$A$1
改成=[A.xlsx]工作表1!A1向下拉試看看!
cjw
TOP
801118
發短消息
加為好友
801118
當前離線
UID
13989
帖子
2
主題
1
精華
0
積分
3
金錢
3
點名
0
作業系統
window7
軟體版本
office2010
閱讀權限
10
在線時間
1 小時
註冊時間
2013-6-2
最後登錄
2017-11-2
小學生
帖子
2
主題
1
精華
0
積分
3
點名
0
作業系統
window7
軟體版本
office2010
閱讀權限
10
註冊時間
2013-6-2
最後登錄
2017-11-2
3
#
發表於 2017-8-23 09:33
|
只看該作者
回復
2#
cjw
這方法不行
痾 抱歉表達的不清楚
像我有7個檔案分別黨名1~7
7號黨sheet1要抓取分別1~6 sheet1裡的某一直列範圍裡的檔案
因為要抓取好多直列 所以想問能接把分別1~6的sheet1檔案 連動抓取到檔案7裡(這樣就可以用下拉)
不知道這樣說明懂不懂(表達弱弱的)
TOP
georgehu
發短消息
加為好友
georgehu
當前離線
UID
28724
帖子
5
主題
0
精華
0
積分
4
金錢
4
點名
0
作業系統
win10
軟體版本
2013
閱讀權限
10
在線時間
2 小時
註冊時間
2017-6-9
最後登錄
2021-11-20
小學生
帖子
5
主題
0
精華
0
積分
4
點名
0
作業系統
win10
軟體版本
2013
閱讀權限
10
註冊時間
2017-6-9
最後登錄
2021-11-20
4
#
發表於 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)
TOP
JasonChen576
發短消息
加為好友
JasonChen576
當前離線
UID
30682
帖子
14
主題
4
精華
0
積分
16
金錢
16
點名
0
作業系統
win 10
軟體版本
office 2010
閱讀權限
10
性別
男
在線時間
5 小時
註冊時間
2018-1-29
最後登錄
2026-9-11
小學生
帖子
14
主題
4
精華
0
積分
16
點名
0
作業系統
win 10
軟體版本
office 2010
閱讀權限
10
性別
男
註冊時間
2018-1-29
最後登錄
2026-9-11
5
#
發表於 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")
TOP
靜思自在 :
【時間無法遮擋】怕時間消逝,花了許多心血,想盡各式方法要遮擋時間,結果是:浪費了更多時間,且一無所成!
返回列表
下一主題
上一主題
EXCEL專屬討論區
Excelㄧ般區
Excel程式區
進階應用專區
OFFICE 系列
Word
PowerPoint
Access
Office不分區
程式語言
VB 與 VB.Net
C 與 C#
Java 與 J#
程式設計不分區
資料庫
ORACLE
My SQL
MS SQL
網頁設計
ASP 與 ASP.NET
PHP
PHP+MySQL 入門實作
JavaScript
FLASH / ActionScript
HTM/ HTML/ CSS
網頁設計不分區
電腦與作業系統
電腦各種硬體討論
一般電腦軟體討論
論壇事務
管理公告
投訴反映
新手測試
愛 • 生活
公益佈告欄
生活與感動
[收藏此主題]
[關注此主題的新回復]
[通過 QQ、MSN 分享給朋友]
申請友情鏈接
Facebook粉絲