如何在excel自动运行另外一个工作薄vba
发布网友
发布时间：2022-04-22 02:48
共1个回答
热心网友
时间：2023-09-18 11:32
需要先打开相应的工作薄。
例如：
WorkBooks.Open "气站" & Format(Now(), "yyyy-mm-dd") & "日报表" & " .xls"Application.Run "气站" & Format(Now(), "yyyy-mm-dd") & "日报表" & " .xls" & "!" & 更新日报表。
联想GeekPro2020
Windows 10
Excel 2019
1、点击Excel界面左下角的录制宏按钮录制宏。
2、在【宏名】处输入一个有意义的名称，帮助以后识别该宏的功能。本例按照默认名称命名。选择将宏录制在【个人宏工作簿】并点击【确定】按钮。
3、马上点击Excel界面左下角的停止录制宏按钮停止宏的录制。
4、按Alt+F11打开VBE界面，如下图。
5、在代码部分输入或者粘贴执行某项特定功能的代码。
6、在功能区（Ribbon）上鼠标右键，选择【自定义快速访问工具栏】。
7、向窗体中拖动一个“标签”和一个“按钮”，右击“按钮”，从其扩展菜单中选择“属性”项。
8、双击“获取Excel数据”按钮，在打开的代码编辑窗口中，输入以下代码。
9、双击“Sheet1”工作表，在弹出的代码编辑窗口中输入如下代码。
10、返回Excel表格，激活Sheet1工作表，就可以看到窗口弹出，同时点击“获取Excel数据”按钮，就可以读取Excel中的数据啦。
