excel中使用vba来制作一次性打开多个工作薄的操作技巧

首先我们打开一个工作样表作为例子。

使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：

Option Explicit

Sub 打开工作列表()

Workbooks.Open ("C:UsersJohnDesktop最新员工excel工资表模板")

'Workbooks.Open ("C:UsersJohnDesktop最新员工excel工资表模板1")

'Workbooks.Open ("C:UsersJohnDesktop最新员工excel工资表模板2")

'Workbooks.Open ("C:UsersJohnDesktop最新员工excel工资表模板3")

'Workbooks.Open ("C:UsersJohnDesktop最新员工excel工资表模板4")

End Sub

这里括号内的是需要打开的工作薄的绝对路径，包含文件名称，文件的路径可以以这种方式获取。在文件上用鼠标右键单击，面板中选择属性。

其中位置这一栏信息即是文件的路径，这栏信息可以使用鼠标拖选后进行复制粘贴。

举例说明一下这个功能的作用不是让大家打开单个工作簿的使用，而是需要批量打开工作薄时使用，比如在使用时已经打开一个同名工作薄，那么就会造成错误。

同样即是是属于不同路径但是相同文件名的两个文件，excel无法打开，那么vba同样也无法通过命令打开。大家需要注意这一点。如果大家有其他的需要，也可以将打开命令声明给一个对象变量。