Excel用VBA總按鈕控制幾個表
2 回答
飲歌長嘯
TA貢獻1951條經驗 獲得超3個贊
Sub copyall()
For i = 1 To 5 '數字改文件總數
Set excel_Book = Workbooks.Open("E:\excel\" & i &".xlsx") '址寫作"E:\xxx\xxx\"保留英文雙引號
Set excel_Sheet = excel_Book.Worksheets("Sheet1")
'調用sub
Call 文件
Next
Set excel_Sheet = Nothing
Set excel_Book = Nothing
End Sub
- 2 回答
- 0 關注
- 716 瀏覽
添加回答
舉報
0/150
提交
取消