VBA代码转Delphi,该怎么处理

fieldset{padding:10px;}

VBA代码转Delphi如下所示为VBA代码：Selection.SubtotalGroupBy:=3,Function:=xlSum,TotalList:=Array(4),_Replace:=True,PageBreaks:=False,SummaryBelowData:=True怎么才能转换为delphi代码呢？？vba代码转delphi有没有方便的方法呢？

delphi?vba ——解决方案——————————————————–没有方便的方法，只能看VBA代码里面参数类型在Delphi里面对应的参数类型是什么，一个个翻译过来。——解决方案——————————————————–

varxlApp:TOleVariant;begintrySelfControl:=False;XlApp:=GetActiveOleObject('Excel.Application');//connecttorunninginstanceexcepttryXlApp:=CreateOleObject('Excel.Application');//norunninginstance,startnew.exceptMessageDlg('UnabletostartExcel',mtError,[mbOk],0);Exit;end;////herecomessomecodetoopen/selectworksheet,...etcXlapp.Selection.Subtotal(3,xlSum,VarArray(4),True,False,True)exceptend;

refertohttp://www.delphigroups.info/2/7/932322.html爱情纯属天性，不用思考。你不能为爱而爱，

相关文章：

你感兴趣的文章：

标签云：