按键精灵 读取excel表格内容 并粘贴
哪位高手帮我写个代码我现在的工作是这样的要求把一堆excel表格里的数据填写在网站上一个个复制粘贴太麻烦录制按键精灵代码执行起来老出错修改起来速度太慢!可不可以写这样一个...
哪位高手帮我写个代码 我现在的工作是这样的 要求把一堆excel表格里的数据 填写在网站上 一个个复制粘贴太麻烦 录制按键精灵代码 执行起来老出错 修改起来速度太慢!
可不可以写这样一个代码 读取我打开的表格第二行 a列到k列的内容 应该可以用变量什么的吧? 然后 在写一段代码 就是 把复制的内容 按顺序 一个一个粘贴到 网站的格子里
比如说 定义一个变量A 然后把A2单元格内容复制 在定义一个变量B 读取B2单元格 完了 之后进入网站 在xy坐标的地方 点击一下 粘贴变量A的内容 saying什么的吧?整个过程完了之后 清空所有变量 我打开第二张表 在进行第二回合的复制 展开
可不可以写这样一个代码 读取我打开的表格第二行 a列到k列的内容 应该可以用变量什么的吧? 然后 在写一段代码 就是 把复制的内容 按顺序 一个一个粘贴到 网站的格子里
比如说 定义一个变量A 然后把A2单元格内容复制 在定义一个变量B 读取B2单元格 完了 之后进入网站 在xy坐标的地方 点击一下 粘贴变量A的内容 saying什么的吧?整个过程完了之后 清空所有变量 我打开第二张表 在进行第二回合的复制 展开
4个回答
2011-10-17
展开全部
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
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
展开全部
h列的身份证号码中批量提取出出生年月的公式是=mid(h1,7,4)&"年"
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
留qq
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你联系,方法好多,教你。HI 我
追问
你不在线啊
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询