本篇经验将和大家分享[在VBA中，如何打开目录下的工作表？]
方法/步骤
-
1
在工作表中，点击菜单栏【开发工具】，在其工具栏里，点击【visual basic】,进入VBA界面！
-
2
在VBA界面，点击菜单栏【插入】，在其下拉菜单中，点击【模块】！
-
3
会弹出【代码编辑】窗口！
-
4
在【代码编辑】窗口，输入如下代码。
Sub 打开指定目录下的文件()
Dim a$
a = Dir("f:\*.xlsx")
Workbooks.Open ("f:\" & a)
Do
a = Dir
If a <> "" Then
Workbooks.Open ("f:\" & a)
Else
Exit Do
End If
Loop
End Sub
-
5
在VBA界面，点击工具栏内的[运行]按钮！
-
6
会打开F盘目录下的所有EXCEL工作簿！
END
经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。
作者声明：本篇经验系本人依照真实经历原创，未经许可，谢绝转载。
展开阅读全部
文章评论