按键精灵中用懒人插件打不开EXCEL表格
用懒人插件打开EXCEL时,窗口只是闪一下,没有打开,下面也就没法进行了。请问是什么情况。a="C:\Users\hu.jiawu\Desktop"b=Plugin.La...
用懒人插件打开EXCEL时,窗口只是闪一下,没有打开,下面也就没法进行了。请问是什么情况。
a = "C:\Users\hu.jiawu\Desktop"
b = Plugin.LazyOffice.ExcelOpen(a, 1) 展开
a = "C:\Users\hu.jiawu\Desktop"
b = Plugin.LazyOffice.ExcelOpen(a, 1) 展开
展开全部
这是我写的类似可参考的代码:
Call Plugin.Office.OpenXls("D:\1.xls")
Dim i
Dim a()
ReDim a(7)
//rem begin
For s=10 to 189
For i=0 to 6
Text = Plugin.Office.ReadXls(1, s, i+1)
a(i)=Text
Next
Delay 2000
//Hwnd = Plugin.Window.MousePoint()
//Call Plugin.Window.Active(Hwnd)
'按Ctrl+N
KeyDown 17, 1
KeyPress 78, 1
KeyUp 17, 1
Delay 5500
'Auto input user name and password
SayString a(0)
Delay 200
KeyPress "Tab", 1
Delay 200
SayString a(1)
Delay 200
KeyPress "Tab", 1
Delay 200
SayString a(1)
Delay 200
KeyPress "Tab", 1
Delay 200
KeyPress "Up", 1
Delay 200
KeyPress "Tab", 3
Delay 200
KeyPress "Space", 1
Delay 1000
'press Ctrl+Tab
KeyDown 17, 1
KeyPress "Tab", 1
KeyUp 17, 1
Delay 1000
SayString a(2)'Full name
Delay 200
KeyPress "Tab", 1
Delay 200
SayString a(3)'description
Delay 200
KeyPress "Tab", 1
Delay 200
//Goto begin
Next
//close Excel file
Call Plugin.Office.CloseXls()
MsgBox "Total created" & s & " users."
用的按键精灵9.6写的。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询