Excel 组件

Question

请教一个问题，有一个程序，引用了关于Microsoft office 2007相关的组件，开发了相关的程序，
现在他把这个程序用在另一台电脑上，但是这台电脑安装的是Office 2003，他也要用这个程序，
但是考虑在此电脑上开发的别的程序都是引用Office 2003组件，所以不能使用office 2007，
请问现在应该怎么处理这件事？

Answer 1

不要引用office组件，而用以下语种创建office excel对象再判断版本就行了。
Dim excel_app As Object
Set excel_app = CreateObject("Excel.Application")
    
If Val(excel_app.Application.Version) >= 12 Then
   FilePath = Filename1 & ".XLSX" '07版(版本号12是07版）
Else
   FilePath = Filename1 & ".XLS"  '07以下版
End If

Answer 2

king06近来好象比较有空。

Answer 3

你把引用改成 excel 11.0的版本（2003）即可，不要引用12.0版（2007）的你还需要检查下，引用了11.0后，在2003的office上是否可以正常使用

Answer 4

装个低版本的虚机， 把office引用换了(它一般也要提示引用丢失)，再调试一下。
只要没用office2007的新方法，应该可以调试通过。