Переменная и буфер обмена - VBA
Формулировка задачи:
Добрый день! подскажите как переменной присвоить значение ранее скопированного в буфер обмена? по примеру:
Решение задачи: «Переменная и буфер обмена»
textual
Листинг программы
Sub tt()
txt = БуферОбмена
MsgBox txt
End Sub
Function БуферОбмена() As String
With GetObject("New:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")
.GetFromClipboard
БуферОбмена = .GetText(1)
End With
End Function