❶ 如何用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