Login
网站首页 > 文章中心 > 其它

vba获取剪贴板内容

作者:小编 更新时间:2023-08-16 12:03:20 浏览量:177人看过

VBA可以使用剪切板,不能修改里头的数据啊,你可以将剪切板里的数据临时放到一个表里,修改完在使用复制,就可以了

VBA操作剪贴板数据

第一段:设置剪贴板内容

第二段:读取剪贴板内容

Function GetClipBoardText()

Dim MyData As DataObject

Set MyData = New DataObject

If MyData.GetFormat(1) = True Then

MyData.GetFromClipboard

GetClipBoardText = MyData.GetText(1)

End If

End Function

用VBA可以实现你的要求,但要根据剪贴板的数据类型采用不同的方法.

如果剪贴板内容是纯文本,可建一个文本框,用Paste方法将剪贴板内容粘贴到文本框,修改后(有规律可用VBA代码修改)用Copy方法复制到剪贴板就达到你的目的.

如果剪贴板上是其他数据(如Word文档内容、图片等),可用Shell 函数调用相应的程序处理,修改时也可用SendKeys 语句由程序进行,最后用SendKeys "^c" 语句将修改后的内容复制到剪贴板.

前提是你已经复制了图片到剪切板,执行下列语句:

Selection.PasteAndFormat (wdPasteDefault)

即可粘贴到文档中

sub setText

MyData.Clear

MyData.SetText "我是VBA设置的内容!"

MyData.PutInClipboard

end sub

取数据的方法是:

MyData.GetFromClipboard()

msgbox MyData.GetText()

以上就是土嘎嘎小编大虾米为大家整理的相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!

版权声明:倡导尊重与保护知识产权。未经许可,任何人不得复制、转载、或以其他方式使用本站《原创》内容,违者将追究其法律责任。本站文章内容,部分图片来源于网络,如有侵权,请联系我们修改或者删除处理。

编辑推荐

热门文章