Я хочу скопировать текст в буфер обмена Windows 10, готовый для вставки с помощью Ctrl + V, в соответствующее внешнее приложение.
Я нашел многообещающий ответ, не могу работать: Копировать содержимое переменной в буфер обмена VBA (Excel 2013)
Мой упрощенный тестовый код:
Sub TestCopyTextToVar()
Dim myData As DataObject
Dim Output As String
Output = "abc"
Set myData = New DataObject
myData.SetText Output
myData.PutInClipboard
MsgBox (Output & " Text has been copied")
End Sub
MsgBox отображает вывод правильно как 'ab c'.
Вставить в Блокнот (или другие приложения, такие как предполагаемое приложение) ничего не отображается.
TextPad отображает два знака вопроса «??».