wordvba调试
- 作者: 咚咚85055973
- 来源: 51数据库
- 2020-04-21
一、我在word vba 环境下,怎么可以调用打开指定EXCEL文件
挺简单的。最关键的就是让word的VBA能调用excel的VBA的函数库。具体做法如下：
1）添加函数库，让excel和word的VBA函数共享
要用VBA联合操作word和excel，首先选定是用word的VBA来操作excel还是用excel的VBA来操作word，然后调出你选定的VBA，在工具〉参照设定中把Microsoft Office15.0 Object Library和Microsoft Excel15.0 Object Library给选上。这个十分有必要，因为word和excel的vba的一些函数并不是通用的。
2）连接excel
具体的方式如下：
Sub Macro1()
Dim ExcelApp As Object
Dim myBook As Object
Dim mysheet As Object
If Tasks.Exists("Microsoft Excel") = True Then Tasks("Microsoft Excel").Close
Set ExcelApp = CreateObject("Excel.Application")
Set myBook = ExcelApp.Workbooks.Open("D:\Users\Administrator\Desktop\练习\2 WROD\新建文件夹\1.xls") 'excel的位置，用
'thisworkbook.path可设置为
'相对路径
Set mysheet = myBook.Worksheets("Sheet1") 'sheet名
With mysheet
'调用数据计算部分
end with
大概就是这样一个过程。
二、如何使用VBA,Excel调试技巧
方法/步骤
进入VBA环境，一种通过宏的方式进入vba环境，另一种就是通过工具---宏---visual basic 编辑器进入，如下图。
双击我们要用vba操作的sheet，这里选择sheet1，如下图。
在打开的代码编辑窗口编写代码，如下图所示。
编写好代码后，我们按快捷键Ctrl+G调出立即窗口（用来显示debug.print输出值和调试输出），如下图所示。
使用F8快捷键单步执行程序，结果如下图，要求我们激活宏。
这是我们的Excel宏的安全级别太高导致，现在我们调整下宏的安全级别，如下图。点击工具--宏---安全性。在安全性对话框中，选中安全级别中或者低，点击确定按钮。
关闭文档，重新打开，打开vba编辑器，点击F8，结果如下图。程序就会单步执行，这里为了演示，故意写了句错误语句。
修改语句后，单步执行如下图所示。我们可以看到i,j的输出值。
调出监视窗口，操作如下图。在编辑窗口空白处右键点击，选择监视添加监视，如下图。可以将变量或者表达式添加到监视窗口里，单步调试时，可以观察变量变化。
调出本地窗口，本地窗口用来查看现有变量的值。操作如下图所示。这样我们就有了自己调试vba的环境了，几个窗口和单步调试，剩下的就是我们要学习一下这门语言了。
三、怎样在Word中用VBA操作表格
1、在新工作表的Sheet1上点击右键 2、选择查看代码 3、点击倒三角，选择Worksheet 4、点击右边倒三角，选择触发方式，如BeforeDoubleClick表示在双击鼠标左键时触发 5、点击候出现如下代码框架 6、输入以下语句：Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)意为将A1、B1单元格求和并放在C1单元格 7、点击保存，然后关闭VBA窗口 8、由于A1,B1没有数据，所以C1为0 9、输入数据后，会发现即使按了回车，C1也不变，因为设置的是双击鼠标左键触发。
10、双击鼠标左键后就变了 。
四、怎样在Word中用VBA操作表格
1、在新工作表的Sheet1上点击右键
2、选择查看代码
3、点击倒三角，选择Worksheet
4、点击右边倒三角，选择触发方式，如BeforeDoubleClick表示在双击鼠标左键时触发
5、点击候出现如下代码框架
6、输入以下语句：Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)意为将A1、B1单元格求和并放在C1单元格
7、点击保存，然后关闭VBA窗口
8、由于A1,B1没有数据，所以C1为0
9、输入数据后，会发现即使按了回车，C1也不变，因为设置的是双击鼠标左键触发。
10、双击鼠标左键后就变了
