❶ 如何用vba讀取多個excel文檔的數據
通過VBA中的函數sheets(!workbook.worksheet).select，就可以將當前的文件指針指向所選的工作薄中的指定工作表。
參數說明:
workbook為工作簿名即文件名
worksheet為工作表名
當文件指針設定好後，就可以對指定文件的指定工作表進行操作了。
❷ vba如何打開一個文件夾下所有xls文件
注意神碧此 c:\a 目錄下的文件不要太多,免得死機
Sub 打開excel表格()
Dim myPath$, myFile$, AK As Workbook
Application.ScreenUpdating = False '凍結屏幕，以防屏幕抖動
myPath = "c:\a\" '游迅把文件路徑定義給變數
myFile = Dir(myPath & "*.xls") '依次找尋指定慧鏈路徑中的*.xls文件
Do While myFile <> "" '當指定路徑中有文件時進行循環
If myFile <> ThisWorkbook.Name Then
Set AK = Workbooks.Open(myPath & myFile) '打開符合要求的文件
End If
myFile = Dir '找尋下一個*.xls文件
Loop
Application.ScreenUpdating = True '凍結屏幕,此類語句一般成對使用
End Sub