按键精灵 提取某个WORD的全部内容到剪切板 或者直接输入出去 200
我想提取某个WORD的全部内容到剪切板或者直接输入出去怎么实现呢求助各位大神~！！！必须是word，不能是txt。。...
我想提取某个WORD的全部内容到剪切板 或者直接输入出去
怎么实现呢
求助各位大神~！！！
必须是word，不能是txt。。 展开
怎么实现呢
求助各位大神~！！！
必须是word，不能是txt。。 展开
1个回答
展开全部
lsFileName ="C:\Helloworld.doc" '请将此处替换为word文档地址
Set wordObj = CreateObject("Word.Application") '调用word应用类
wordObj.Visible = False '设置为不可见
wordObj.Documents.Open (lsFileName) '打开word文档
mStr = wordObj.ActiveDocument.Content.Text'读取word文档内容并赋值给mStr
wordObj.Quit '退出word应用类
Set wordObj = Nothing '销毁word应用类
'MsgBox mStr'弹出word内容窗口(此行作调试用)
Call Plugin.Sys.SetCLB(mStr)'把word内容设置为剪贴板
'因为word的原因执行可能较慢
追问
能不能复制到剪切板？
然后我需要设置字体、颜色等等
追答
代码里已经有复制到剪切板了。但是设置字体颜色是什么意思
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
博思aippt
2024-07-20 广告
博思AIPPT是基于ai制作PPT的智能在线工具，它提供了4种AI制作PPT的方式，包括AI生成大纲、AI直接生成PPT、文本生成PPT、AI提炼word文档生成PPT，一站式集成多种AI生成PPT的方式，可满足办公用户的不同需求和使用场景...
点击进入详情页
本回答由博思aippt提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
