VBA代码 从剪贴板取出文本2025年3月18日 14:47
Private Function GetCB() '从剪贴板获取数据
With CreateObject("Forms.TextBox.1")
.MultiLine = True
If .CanPaste = True Then .Paste
GetCB = .Text
End With
End FunctionPrivate Function GetCB() '从剪贴板获取数据
With CreateObject("Forms.TextBox.1")
.MultiLine = True
If .CanPaste = True Then .Paste
GetCB = .Text
End With
End Function
全部回复（0）