这个不难的
x=??:y=??:z=??
u=??:v=??:w=??
n=??
for n
Call Plugin.Office.OpenXls("C:\a.xls")
delay 2000 //打开和关闭一定要有足够延时,不然无法读取数据
Text = Plugin.Office.ReadXls(x, y, z)//第x个工作表,第y行,第z列
Call Plugin.Office.CloseXls()//关闭xls,一定要先关闭才能开新的xls,如果程序终止不当需要在任务管理器中关闭xls进程才能再次运行
delay 2000
Call Plugin.Office.OpenXls("C:\b.xls")
delay 2000
Call Plugin.Office.WriteXls(u, v, w, Text)
Call Plugin.Office.CloseXls()
delay 2000
y=y+1//这儿就是读取时自动向下加一行,循环的时候就
v=v+1
next
-------------------------------------------------------
xls向xls读写的时候由于要打开和关闭程序速度会很慢,建议xls向txt进行读写那样就只要打开一次xls就行了脚本如下
Call Plugin.Office.OpenXls("C:\a.xls")
delay 2000
x=??:y=??:z=??
n=??
for n
Text = Plugin.Office.ReadXls(x, y, z)
Call Plugin.File.WriteFileEx("C:\b.txt", Text)
y=y+1
next
Call Plugin.Office.CloseXls()
------------------------------------------------------
希望对你有帮助
我也不会- -