[算表] VBA如何讀取未開啟的算表?

看板Office作者時間12年前 (2013/08/10 21:33), 編輯推噓0(002)
留言2則, 1人參與, 最新討論串1/1
軟體:excel 版本:2007 版眾好,我在某個資料夾中有10幾個excel表, 每個excel各有數量不等的工作頁。 我想把這些工作頁分開全都放到一個excel裡, 但是我寫的VBA只能在他們都開啟的時候抓到當時開啟的工作頁, 而且要先把excel的名稱全部都先改成數字(ex. 1.xlsx, 2.xlsx, ...) 想請問版眾3個問題,煩請指導,謝謝。 1. 如何一次讀取此資料夾中所有excel的名稱 2. 如何在不開啟excel檔案的時候就能抓到資料 3. 各excel的不同工作頁要如何都能抓到 ---------------- Sub 工作表複製() MsgBox "複製使用中的工作表,並貼到目前使用的工作表" For I = 1 To 10 Workbooks(I & ".xlsx").Sheets("Sheet1").Copy before:=Workbooks("test.xlsm").Sheets("Sheet1") Next I End Sub -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 114.25.188.152

08/10 21:43, , 1F
1.Dir() 2. CreateObject("Excel.Application")
08/10 21:43, 1F

08/10 21:43, , 2F
3.For each...next
08/10 21:43, 2F
文章代碼(AID): #1I1a4mB_ (Office)
文章代碼(AID): #1I1a4mB_ (Office)