按键精灵逐行读取文本并复制粘贴? 按键精灵逐行读取文本并复制粘贴至某窗口执行命令

作者&投稿:挚龙 (若有异议请与网页底部的电邮联系)
path = Plugin.file.SelectFile()
text = Plugin.File.ReadFileEx(path)
MyArray = split(text, "|")
Plugin.Office.OpenXls("c:\1.xlsx")
If UBound(MyArray) > 0 Then
For i=0 to Ubound(Myarray)-1 step 1
Call Plugin.Office.WriteXls(1, i + 1, 1, MyArray(i))
Delay 1000
Next
Call Plugin.file.CloseFile("c:\1.xlsx")
End If

如果只是这样的文本文件,直接用EXCEL打开就行了,为什么要用按键精灵这么麻烦?

按键精灵逐行读取文本并复制粘贴?~

text = Plugin.File.ReadFileEx("C:\Users\lenovo\Desktop\1.txt")
dim MyArray
MyArray = Split(Text, "|")
If UBound(MyArray)>=0 Then
i=0
For UBound(MyArray)
//下面这句是得到文本内容
SayString Cstr(MyArray(i))
Delay 1000
Msgbox "成功输入第 " & i+1 &" 行文本内容为:"& Cstr(MyArray(i))
Delay 1000
i=i+1
Next
End If
这个不知道行不行。没看懂你到底读取完了之后要怎么操作,先解决读取部分吧。如果读取部分没问题你追问一下 我给你写剩下的

按键精灵怎么逐行读取 读取一次 把读取的内容复制到剪切板 然后等把复制的内容粘贴到别的文本后 继续读取第二行 继续复制第二行 继续粘贴到别的文本。。。

按键精灵8 怎么逐行读取TXT内容 我放在D盘下一个txt文档 逐行提取这个t...
答:Msgbox "向目标文件读出文本内容为:"& Text dim MyArray MyArray = Split(Text, "|")If UBound(MyArray)>=0 Then i=0 For UBound(MyArray)//下面这句是得到文本内容 Msgbox "第 " & i+1 &" 行文本内容为:"& Cstr(MyArray(i))i=i+1 Next End If //以上是按键精灵例子,要点是...

求一个按键精灵代码,每一个操作循环从文本逐行复制一条信息
答:text = Plugin.File.ReadFileEx("C:\Users\lenovo\Desktop\1.txt")dim ... Then i=0 For UBound(MyArray) //下面这句是得到文本内容 SayString Cstr(MyArray(i)) Delay ...

按键精灵 复制TXT 文件再逐行粘贴的问题
答:把代码复制到按键精灵就有翻译了,主要这句吧:Text = Plugin.File.ReadFileEx("F:\办公\6666.txt")//读取F盘办公文件夹中的6666文档 MyArray = Split(Text, "|")//把这个些内容分开后得到的默认值为MyArray If UBound(MyArray)>=0 Then//判断这个文档究竟有没有内容 ...

按键精灵怎么逐行读取TXT内容
答:读TXT文件,这样麻烦。最好的办法是读 ini配置文件 过程:1、定义文件路径:filetiegui = "c:\new\铁床.ini"2、读取数字记录 num = Plugin.File.ReadINI("command", "num", filetiegui)3、记录加1 num = num + 1 4、生成值 账号 valu = "valuser" & num 4、生成值 ...

手机版按键精灵如何逐行读取txt档逐行在手机里输入
答:手机版按键精灵如何逐行读取txt档逐行在手机里输入 15 如题再麻烦大神解答了是手机版的喔!!按键精灵开出来是蓝色的... 如题再麻烦大神解答了是手机版的喔!!按键精灵开出来是蓝色的 展开  我来答 1个回答 #热议# 国际对恐怖组织的定义是什么?

按键精灵里,用键盘命令怎么制作复制粘贴的脚本?求解,拜托
答:如果是文本内容 ,先读取分割一下,再用saystring命令输出,如果是Excel也可以逐行读取,然后输出。如果是识别屏幕上的文字,可以使用大漠插件找字功能识别后输出,最差的,就是录制操作,然后选择文本后输出内容。

用按键精灵,自动输入txt文本的脚本。
答:你的需求基本是自动喊话的雏形,逐行读取c:\1.txt文件,逐行黏贴出来,脚本见截图:

按键精灵怎么逐行自动读取文本中的文字,并自动输入某处?
答:那个使用比较繁琐,我们是用的图形化脚本工具软件(无敌点击狗)就一键自动化搞定了,能自动输入录入的。网上有无敌点击狗软件的很多使用范例,操作就是简单的添加几个任务即可,你只需把一次输入录入的过程编排,无敌点击狗就能批量自动化帮你执行了。

按键精灵怎么逐行自动读取文本中的文字,并自动输入某处...
答:txt = Plugin.File.ReadFileEx("路径")a = split(txt, "|")

按键精灵 剪切板 复制 输出
答:意思就是一些输入框无法粘贴所复制的内容进去吧?你是希望能通过粘贴吧已经复制的内容粘贴到这个输入框里:JQB = Plugin.SYS.GetCLB()//↑读取剪切板内容 SayString JQB //↑输入剪切板问题(非复制)复制好内容,然后在输入框里运行上面两行脚本就行....