弄好这个Excel狗,应用按键精灵excel随机选取单元格择excel单元格内容,可以选择多个单元格内容!!!

按键精灵如何把excel资料一个贴到软件查询? - 怎么办? - 怎么治?
skolima 提问:
按键精灵如何把excel资料一个贴到软件查询?
公司有一个订货软件每天都要查询单价贴到ECXEL,但资料太多可以自动复制到EXCEL-想用按键精灵解决步骤:按Q查-复制EXCEL的内订号码-ENTER-贴单价到EXCEL但我用按键精灵录制功能----贴单价到EXCEL位置会跑掉我想用按键精灵里{有无excel指定行列选定复制及贴上},而他可以跟我的录制相结合?如此excel位置不会跑掉?订货软件图 更多: /conv/41abc9ef1f6d9f5feadb71bda21ba828efbg.jpgexcel图/conv/9ba47b28d969d6e038dbd577e25c4a56f55e45fc445f9ed4fea0fd9a4f325dae6g.jpgexcel档案/file/d7ummgz9m3yjoik/内定.xls
q303 回答:
大大的问题解决了吗?思路是这样的,先在软件窗口上点击Alt+Q ,接下来读取Excel单元格上的资料并保存到变数中,焦点回到订货软件窗口上,发送变数中的资料。//请从这行开始复制,包涵这行。UserVar excelDangAnWeiZhi=&C:\内定.xls& &Excel档案的位置,注意必须要以「&&」符号包围&UserVar danYuanGeX=2 &单元格起始的行(横的)&UserVar danYuanGeQiShiX=4 &单元格起始的列(直的)&UserVar danYuanGeJieShuY=8 &单元格结束的纵列(直的)&//先取得一下窗口的控制代码,因为你给的图没办法详细的判断座标,所以用目前的MessageBox &点击确定后,请点击一下软件的标题,让软件窗口处于最上层,并按任意键&WaitKeyHwnd = Plugin.Window.Foreground()//------------ 脚本段开始!i = 0Call Plugin.Office.OpenXls(excelDangAnWeiZhi) //先打开 Excel 档案以备读取Do Until i = danYuanGeJieShuY - danYuanGeQiShiX //因为起始的座标与结束的座标都包涵在内,所以加上 1KeyDown &Alt&,1KeyPress &Q&,1KeyUp &Alt&, 1Delay 750 //延迟一下,确保程序正常执行。//上面是 Alt+Q 的 Script//接下来,读取 Excel 单元格并保存到变数 myStr 中myStr = Plugin.Office.ReadXls(1, danYuanGeQiShiX + i , danYuanGeX)//回到订货软件窗口。Call Plugin.Window.SendString(Hwnd, sStr)i = i + 1Loop//脚本结束,复制到这里就可以了。大大给的图片还缺一张,就是按了Alt+Q之后的效果!因为我不知道按了Alt+Q是会跳出新窗口还是软件的画面会变!
最新问题:,,,,,,,,,,,,,,,
CopyRight & 2015
All Rights Reserved您所在的位置: >
> 按键精灵如何调用Excel及按键精灵写入Excel数据的方法教程
按键精灵如何调用Excel及按键精灵写入Excel数据的方法教程
日  来源:互联网  次阅读
按键精灵是一个模拟鼠标键盘动作的软件。通过制作脚本,可以让按键精灵代替双手,自动执行一系列鼠标键盘动作。按键精灵简单易用…
页面地址:/xiazai/anjianjingling.html
首先来建立一个新的Excel文档,在桌面上点击右键,选择【新建】-【Excel工作表】,命名为【新手学员】。
现在这个新Excel文档是空白的,我们接下来会通过的脚本来打开并写入一些数据。
打开按键精灵软件,点击【新建】,进入我的脚本界面,再点击进入【全部命令】。
在【全部命令】中选择【插件命令】-【office办公文档插件】-【打开Excel文档】。
在命令的下面可以看到命令的详细设置,点击【路径】。
在弹出窗口中选择【新手学员】的Excel文档,点击打开。
可以在命令参数中看到引用的文档,点击插入就可以插入对应的命令脚本。
继续在文档中写入新的数据,选择命令【writeXls 写入Excel文档单元格】,选择对应的单元格的行和列,输入要写入单元格的内容【&序号&】,点击插入。
在脚本界面可以看到新插入的代码。
根据类似的格式,可以添加其它代码,一共写入3行4列的单元格内容。
最后选择【closeXls 关闭文档】,点击插入对应的代码。
修改脚本属性的描述和保存的脚本文件名。保存脚本后按【F10】进行脚本调试。
脚本执行完成后,再次打开这个Excel文档,可以看到刚才设置的数据已经成功写入了。
看过这篇文章的人还看过
输入你的评价或问题……
热门关键字寻找按键精灵高手 平时工作用excel表格,要复制粘贴很多次东西到我们的办公网里面,有哪位高手可以_百度知道
寻找按键精灵高手 平时工作用excel表格,要复制粘贴很多次东西到我们的办公网里面,有哪位高手可以
找按键精灵高手平时工作用excel表格?每天复制粘贴真的伤不起,眼睛痛死了,要复制粘贴很多次东西到我们的办公网里面,有哪位高手可以帮我做脚本
, 466,intY/&#47.9, 734; 0 And intY &gt:\ 0 And intY &AA:&#92,intX:&#92.9;5If intX &gt, 741:&#92:&#92:&#92.9,你思路有问题a = 0b = 0c = 0d = 0e = 0f = 0g = 0
/&#47, 731;&#47.9.bmp&quot, 878,0;;A 0 And intY &gt, 1027; 0 Then
g = g+1End IfFindPic 393.9, 631:&#92,0;座位006.9, &quot,intX,intX, 675; 0 And intY &;Attachment, 673,intX;2If intX &gt, 427,0.bmp&quot,intY/.bmp&quot, 1027;座位009, 500; 0 And intY &gt, 426;Attachment, 734.bmp&quot, &座位001, 694; 0 And intY &gt,0;/座位006.9, 632;座位004, 891;4If intX &gt.bmp&quot, 439; 0 Then
i = i+1End IfFindPic 526, 694;5If intX &A 0 Then
i = i+1End IfFindPic 538; 0 Then
e = e+1End IfFindPic 526; 0 And intY &gt,intX; 0 And intY &, &座位009,0.9,c找到后就把A图就没+1了, 458; 0 And intY &gt:&#92,intX,intY&#47,intX,确保附件有该图片i=0FindPic 843, &quot, 436;座位007;3If intX &座位001.bmp&; 0 Then
d = d+1End IfFindPic 684;3If intX &A&#47, 569;,intY/&#47.bmp&9If intX &gt, 569;/, 382.9; 0 Then
c = c+1End IfFindPic 848,intY&#47, 731;;8If intX &gt, 436;Attachment, & 0 And intY &gt,intX; 0 Then
f = f+1End IfFindPic 391;; 0 Then
h = h+1End IfFindPic 538;Attachment,intX.bmp&quot,intY
i = i+1End IfFindPic 848.9;;座位005; 0 And intY &7If intX &gt, 391;7If intX &gt, 458,0;A8If intX &gt.bmp&quot,0, &7 Then
EndScriptElse
Call kaishiyouxi() End If请采纳答案, &/ 0 And intY &gt, &quot,intY&#47,intY/座位004:&#92, 733:\寻找九张不同图并返回累加张数之和.bmp&/ 0 Then
= r+1End Ifi=a+b+c+d+e+f+g+h+rIf i & 0 And intY &6If intX &gt, 391.9;&#47, 741,0,0;Attachment, 466, 632.bmp&quot,intX;,0, 694.bmp&座位008.9.9; 0 Then
i = i+1End IfFindPic 982;, 733, 500, &quot, 675;Attachment, &/ 0 And intY &7 Then
EndScriptElse
Call kaishiyouxi() End If方案2
你这脚本如果你的B图没找的的话;/1If intX &gt, 500,intX.bmp&quot, & 0 Then
i = i+1End IfFindPic 393, 878, 673;6If intX &gt.bmp&座位008; 0 Then
i =i+1End IfFindPic 391;Attachment, 1024;.bmp&:&#92:h = 0r = 0i = 0FindPic 843,intY/ 0 Then
b = b+1End IfFindPic 982:\ 0 And intY &座位002,intY/&#47, 500;Attachment, 439,intY
&#47,intX.9, 382,0; 0 And intY &gt, 631;// 0 Then
a = a+1End IfFindPic 988; 0 Then
i = i+1End IfFindPic 988,intY&#47, 580, &quot,intX, & 0 And intY &gt,intY/ 0 Then
i = i+1End IfIf i &gt.bmp&座位007; 0 Then
i = i+1End IfFindPic 684,0;&#47, 427:\4If intX &gt, &quot,intX:&#92, &quot:\ 0 And intY &A座位002,0;9If intX &gt, .bmp&quot, 580;&#47:&#92, &&#47, 891.9;座位003.bmp&Attachment:\,intX, 426;&#47,0;2If intX &gt,0:\座位003.9;,intY&#47, &quot.9,intX,intX, &quot,0;Attachment,intY/1If intX &gt,intY/座位005方案1
注意加延迟,支持我一下,intY&#47,intX,0;Attachment,0,intY&#47, 694, 697.9
其他类似问题
excel表格的相关知识
按默认排序
其他2条回答
听起来不错 具体什么问题呢
说具体点呢
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁

我要回帖

更多关于 按键精灵打开excel 的文章

 

随机推荐