- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 如何将表的行内容一键粘贴到其他程序？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=174830)
-- 发布时间：2022/2/8 15:55:00
-- 如何将表的行内容一键粘贴到其他程序？
类似于按键精灵的形式，因为要根据表格内容在浏览器中填写表格，并且数量巨大。
有办法实现将当前行作为数组或集合的形式，一键在其他程序中粘贴吗？（类似于在Excel中填写a+tab+b+tab+c+tab）这种形式，单个内容。
帮助中的代码不适合我
Dim Proc As New Process
Proc.File = "notepad"
Proc.Start
Proc.WaitForInputIdle() \'等程序自动结束并进入空闲状态
Sendkeys.Send("I Like Foxtable") \'发送按键信息
Proc.File = "notepad"
Proc.Start
Proc.WaitForInputIdle() \'等程序自动结束并进入空闲状态
Sendkeys.Send("I Like Foxtable") \'发送按键信息
我并不需要proc来自动打开程序。我要录入的是当前已经激活的页面。
-- 发布时间：2022/2/8 16:08:00
--
把当前行数据放入剪贴板，然后在其他程序里粘贴即可
Dim r As Row = Tables("表A").Current
Dim s As String
For Each c As Col In Tables("表A").Cols
s = s & vbtab & r(c.Name)
Next
ClipBoard.SetText(s)
-- 发布时间：2022/2/8 16:11:00
-- 你好
放入剪切板的方法我已经知晓 但是因为每列数据之间需要键入tab 或 enter 这个有办法实现吗
-- 发布时间：2022/2/8 16:24:00
--
如果按照全部直接放入剪切板的形式，那么输出结果就会如上图，所有内容都在一个表单中。所以文本版的tab或enter是实现不了，需要sendkey的形式。
-- 发布时间：2022/2/8 16:35:00
--
你这种用UIBOT社区版就可以了，可以操作网页跟按键精灵一类的软件，可以做到全自动
-- 发布时间：2022/2/8 16:41:00
--
可以调用foxtable内的数据吗？
-- 发布时间：2022/2/8 16:45:00
--
这类软件是操作鼠标键盘，理伦上都没问题