Excel用VBA總按鈕控制幾個(gè)表
2 回答
動(dòng)漫人物
TA貢獻(xiàn)1815條經(jīng)驗(yàn) 獲得超10個(gè)贊
Sub copyall()
For i = 1 To 5 '數(shù)字改文件總數(shù)
Set excel_Book = Workbooks.Open("E:\excel\" & i &".xlsx") '址寫作"E:\xxx\xxx\"保留英文雙引號(hào)
Set excel_Sheet = excel_Book.Worksheets("Sheet1")
'調(diào)用sub
Call 文件
Next
Set excel_Sheet = Nothing
Set excel_Book = Nothing
End Sub
- 2 回答
- 0 關(guān)注
- 720 瀏覽
添加回答
舉報(bào)
0/150
提交
取消