vba开发后如何不受word版本限制

来源:百度知道 编辑:UC知道 时间:2024/06/19 11:56:53
我在xp系统word2003下用vba编写代码,我拷贝到另一台电脑word2000下不能运行,如何解决收系统和软件版本限制的问题
宏程序可以运行,找不到Public Function ChooseOneFile(Optional TitleStr As String = "选择你要的文件", Optional TypesDec As String = "所有文件", Optional Exten As String = "*.*") As String
什么对象之类的

如果确实是Office版本不同导致的兼容性问题,那么建议楼主去了解一下应用对象的两种定义方式:后期绑定方式和前期绑定方式。
用后期绑定方式就不会出现这种兼容性问题。

例如:
新建excel工作簿和工作表。

'后期绑定方式
Dim excelApp As Object, excelWB As Object

Set excelApp = CreateObject("Excel.Application")
Set excelWB = excelApp.WorkBooks.Add

'前期绑定方式
Dim excelApp As Excel.Application
Dim excelWB As Excel.Workbook

Set excelApp = New Excel.Application
Set excelWB = excelApp.WorkBooks.Add

看出区别来了吧。
不同office版本间不兼容的问题,我也曾为此头痛过。

当然,如果不是这种兼容性问题,就另当别论了。

看一下是不是安全性高了点了。