系统广告-hd tune 绿色
![剪贴板操作](/uploads/image/0493.jpg)
2023年3月31日发(作者:slic 查看)
VBA操作剪贴板内容
标签:it分类:VB、VBA
VBA操作剪贴板内容
一、
'将变量的值或文本内容复制或发送到剪贴板
'仅对窗体有效,DataObject是MSFORM子类
DimMyDataAsNewDataObject'声明新DataObject类
t"文本内容"'设定文本,可以将
作为文本传递
lipboard'送入剪贴板
二、
FunctionGetClipBoardText()
'将剪贴板中的文本输出到一变量。
DimMyDataAsDataObject
SetMyData=NewDataObject
'如果剪贴板的数据是文本
mat(1)=TrueThen
'从剪贴板中获得数据
mClipboard
'把数据返回给函数值
GetClipBoardText=t(1)
EndIf
EndFunction
三、
给单元格赋值
DimaAsNewDataObject
mClipboard
Range("a1").Value=t
更多推荐
剪贴板操作
发布评论