VB(Visual Basic 6)代码与VBA(Visual basic for Application)代码有非常好的通用性,许多VBA下的代码可以直接复制到VB下使用。但是,如果存在多个Word,那么可能存在Word实例,或者先前的Word实例卸载后重新加载了一个Word实例导致编译后的VB代码不能正确识别是哪个Word实例或者不能正确挂载新实例。
将代码复制到Word文档中,单击【通用】|【宏管理】|【VBA转VB代码】,执行转换过程。
转换过程实际上是在适当的位置添加一个指向Word实例的对象(mywdapp),对mywdapp的定义被拷贝到剪贴板中。具体如下:
Dim mywdapp As Object '使用后期绑定,增加程序的兼容性
'Dim mywdapp As Word.Application '方便编程中mywdapp对象使用IntelliSense功能
Set mywdapp = GetObject(, "Word.Application") '设置mywdapp为指向Word的实例
对mywdapp的定义有两种方式,一种是Dim mywdapp As Object,其好处是在VB的编译过程中使用后期绑定,增加程序的兼容性。另外一种是Dim mywdapp As Word.Application,方便编程中使用IntelliSense功能。具体使用中可以通过简单修改在这两种方式中切换。
相关主题