Excel中的删除重复项VBA语句怎么转成Delphi代码？？？

[xiaonanw]

Excel vba语句：ActiveSheet.Range("$E$4:$I$68").RemoveDuplicates Columns:=Array(1, 2, 3, 4), _
Header:=xlNo
怎么转化成Delphi


我写成：ExcelAppxie.ActiveSheetRange['$K$3:O'+inttostr(k)].RemoveDuplicatesColumns:=Array(1, 2, 3, 4); 报错

哪位知道？

这个vba语句就是删除重复项的作用

[shw014]

   ExcelApp.ActiveSheet.Range['$K$3:O'+inttostr(k)].RemoveDuplicates(
                                               Columns:=VarArrayOf([1, 2, 3, 4]),    Header:=2 ) ;

查资料后知道 xlNo=2 ,这里直接用2 代替

[xiaonanw]

引用 1 楼 shw014 的回复:

   ExcelApp.ActiveSheet.Range['$K$3:O'+inttostr(k)].RemoveDuplicates(
                                               Columns:=VarArrayOf([1, 2, 3, 4]),    Header:=2 ) ;

查资料后知道 xlNo=2 ,这里直接用2 代替

非常感谢，调试通过，因为不是专业程序员，不知道去哪里查资料，谢谢，结贴