按键精灵循环读取表格下一行内容并复制到网页

Call Plugin.Office.OpenXls("d:\1.xls")

dim a,b,c,d,e,f,g,h
a = Plugin.Office.ReadXls(1, 7, 1)
b = Plugin.Office.ReadXls(1, 7, 2)
c = Plugin.Office.ReadXls(1, 7, 3)
d = Plugin.Office.ReadXls(1, 7, 4)
e = Plugin.Office.ReadXls(1, 7, 5)
f = Plugin.Office.ReadXls(1, 7, 6)
g = Plugin.Office.ReadXls(1, 7, 7)
h = Plugin.Office.ReadXls(1, 7, 8)

//下面这句是关闭Excel文档工作表
Call Plugin.Office.CloseXls()

MoveTo 448, 331
LeftClick 1
Delay 100
Call Plugin.Sys.SetCLB(a)
KeyDown "Ctrl", 1
Delay 50
KeyDown "V", 1
Delay 50
KeyUp "Ctrl", 1
KeyUp "V", 1