Foxtable(狐表)用户栏目专家坐堂 → 在调用外部程序打开word文件后怎样实现CTRL+A和CTRL+C全选和复制


  共有2850人关注过本帖树形打印复制链接

主题:在调用外部程序打开word文件后怎样实现CTRL+A和CTRL+C全选和复制

帅哥哟,离线,有人找我吗?
lxy060669
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:168 积分:2609 威望:0 精华:0 注册:2012/10/16 22:38:00
在调用外部程序打开word文件后怎样实现CTRL+A和CTRL+C全选和复制  发帖心情 Post By:2019/3/26 21:30:00 [只看该作者]

老师辛苦了,请问:
在调用外部程序打开word文件后怎样实现模拟CTRL+A和CTRL+C全选和复制内容到剪贴板?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107440 积分:546479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/3/26 22:26:00 [只看该作者]

使用vba复制

Dim app As New MSWord.Application
try
    Dim fileName = "f:\123.docx"
    Dim doc = app.Documents.Open(fileName)
    app.Selection.WholeStory()
    app.Selection.Copy()
catch ex As exception
    msgbox(ex.message)
finally
    app.Quit
End try

 回到顶部
帅哥哟,离线,有人找我吗?
lxy060669
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:168 积分:2609 威望:0 精华:0 注册:2012/10/16 22:38:00
  发帖心情 Post By:2019/3/26 22:31:00 [只看该作者]

那如果是方正的ceb程序呢?打开文档后怎么复制到剪贴板来呢?
[此贴子已经被作者于2019/3/26 22:30:54编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107440 积分:546479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/3/26 22:38:00 [只看该作者]

我也不会

 回到顶部
帅哥哟,离线,有人找我吗?
lxy060669
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:168 积分:2609 威望:0 精华:0 注册:2012/10/16 22:38:00
  发帖心情 Post By:2019/3/26 22:45:00 [只看该作者]

我试一试,看能不能用按键精灵来操作。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/3/27 10:34:00 [只看该作者]

参考

 

下载信息  [文件大小:340.0 KB  下载次数:4]
图片点击可在新窗口打开查看点击浏览该文件:嵌入控制.table


 回到顶部
帅哥哟,离线,有人找我吗?
lxy060669
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:168 积分:2609 威望:0 精华:0 注册:2012/10/16 22:38:00
  发帖心情 Post By:2019/3/27 11:32:00 [只看该作者]

   谢谢老师们!
    我昨天晚上实现了,全天用了18个小时。终于搞定了。
    最后方法是调用外部程序,依照按键精灵的逻辑操作,居然实现了!!
   空闲的时候把过程写出来分享,说不定得到精品贴呢。
   

 回到顶部