Как получить текст из буфера обмена?
Категория: Basic
2012-07-31 14:28:55
code: #vba
On Error Resume Next Dim iData As New DataObject, iText$ 'MSForms.DataObject iData.GetFromClipboard iText$ = iData.GetText(1)
Поделиться:
On Error Resume Next Dim iData As New DataObject, iText$ 'MSForms.DataObject iData.GetFromClipboard iText$ = iData.GetText(1)