您现在的位置:首页 >> API >> API >> 内容

Delphi中使用Office中VBA的优缺点

时间:2011/9/3 15:43:37 点击:

  核心提示:在Delphi中使用OLE来与Office应用程序通讯,不外乎两种方式:直接使用VBA和使用Delphi的封装组(TExcelApplication,TExcelWorkbook,TExcelShee...

在Delphi中使用OLE来与Office应用程序通讯,不外乎两种方式:直接使用VBA和使用Delphi的封装组(TExcelApplication,TExcelWorkbook,
TExcelSheet等等),两种方式各有优劣。这里简要谈谈直接VBA调用方式。

直接使用VBA的优点:

   1:参数传递方面比较灵活。比如打开文档函数Workbooks.Open,它有很多可选参数(可以认为等同于默认参数),在VBA中定义如下:
      Function Open(Filename As String, [UpdateLinks], [ReadOnly], [Format], [Password], [WriteResPassword],
                  [IgnoreReadOnlyRecommended], [Origin], [Delimiter], [Editable], [Notify], [Converter],
                 [AddToMru], [Local], [CorruptLoad]) As Workbook
     在一般的编程语言中,是不可以跳过参数表中某个参数而传递后面的参数的,所以几乎所有的语言都要求例程的默认参数必须定义在参
     数表的最后。而使用VBA可以做到参数的跳跃传递。比如要以只读方式打开文档“D:\Test.xls”,就可以这样调用Open函数:
       xlApp:=CreateOleObject('Excel.Application');
       xlApp.Caption:='Delphi中使用VBA与Excel通讯';
       xlApp.Visible:=True;
       xlApp.Workbooks.Open(FileName:='D:\Test.xls',ReadOnly:=True);
     请注意,上面的调用在传递参数时跳过了参数UpdateLinks。我是在Excel中录制宏并参考其代码后才想到在Delphi中也这样写试试的,
     结果运行通过。这种写法我从来没在Delphi中见过,感到不可思议。所以说,有想法就要实践!
  
   2:可以在Office应用程序中录制宏,然后将生成的宏代码稍加修改就可以复制到Delphi中,简化了代码的编写。参考宏代码时要注意去
     除无用的冗余代码。比如你打开字体对话框,仅改变字体大小,但是在录制的宏代码中会设置所有的字体选项,你需要删除冗余代码。

   3:可以传递多种VBA能识别的格式的参数。比如:
        xlSheet.Columns[1]表示第一列
        xlSheet.Columns['A:G']表示1-7列
  
有优点自然也有缺点,直接使用VBA的缺点是
  
   1:使用Variant来代表OLE对象属于后期绑定方式,效率较低
  
   2:手动编写代码时比较烦琐,因为没有了代码提示功能,并且不能使用with……do来简化代码

作者:网络 来源:转载
共有评论 0相关评论
发表我的评论
  • 大名:
  • 内容:
本类推荐
  • 没有
本类固顶
  • 没有
  • 盒子文章(www.2ccc.com) © 2022 版权所有 All Rights Reserved.
  • 沪ICP备05001939号