如何用VFP命令实现EXCEL表宏执行后的结果,省得贴宏后再执行太麻烦，有没有自动粘贴宏并执行的命令，EXCEL宏的TXT文件如下：
' 进项批量勾选宏自动生成系统V1.0
' 所属期间:2017年07月
Sub 进项2017年07月批量勾选()
    Range("A118").Select
    ActiveCell.FormulaR1C1 = "是"
    Range("A108").Select
    ActiveCell.FormulaR1C1 = "是"
    Range("A109").Select
    ActiveCell.FormulaR1C1 = "是"
    Range("A1").Select
End Sub

[此贴子已经被作者于2017-7-27 12:32编辑过]

eole=CREATEOBJECT('Excel.application')
eole.Workbooks.Open("D:\zzsbb\plgx\wgx.xls")
eole.Application.VBE.ActiveVBProject.VBComponents.Import("D:\ZZSBB\PLGX\进项批量勾选宏.txt")
eole.run("进项2017年07月批量勾选")
eole.visible=.t.
***************
运行到
eole.Application.VBE.ActiveVBProject.VBComponents.Import("D:\ZZSBB\PLGX\进项批量勾选宏.txt")
提示成员VBE不是一个对象，是什么意思

[此贴子已经被作者于2017-7-28 11:49编辑过]