oXL=CREATEOBJECT('Excel.application')
oXL.Workbooks.Open("VFP.xlsx")
dz=oXL.range("A:A").Find("你好VFP",,,xlWhole).address
出错提示"找不到变量xlWhole"

dz=oXL.range("A1").text
if 要查找的内容$dz
  ? [找到]
else
  ? [没找到]
endif

[此贴子已经被作者于2021-9-10 13:08编辑过]

如果要用oXL.range("A:A").Find("你好").address语句返回符合的地址，完全匹配参数xlWhole要怎么使用

z=oXL.range("A:A").Find("你好VFP",,,1).address

学习啦，谢谢！

那如果模糊匹配是将1改成0吗，因为我发现如果前面语句参数是1时，后面再用到FIND语句默认就是完全匹配

xlPart   2
xlWhole  1

再请教一个问题
ActiveSheet.PasteSpecial Format:="文本", Link:=False, DisplayAsIcon:=False
这个是宏录制的一个语句，如何写成
OXL.ActiveSheet.PasteSpecial Format:="文本", Link:=False, DisplayAsIcon:=False
后面的参数要怎么写

试试
OXL.ActiveSheet.PasteSpecial("文本", .F., .F.)
或
OXL.ActiveSheet.PasteSpecial("文本", 0, 0)

[此贴子已经被作者于2021-10-2 16:51编辑过]

谢谢吹水佬，可以了