Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
При вставке из буфера (MyData.PutInClipboard) появляется абракадабра.
 
Добрый день!

Аналогичная ошибка с буфером, причина в том, что если проводник открыт, появляется ошибка при вставке из буфера два квадрата.
Когда закрыт проводник - все ок работает.
Код
Sub Column_to_String()
Dim rr As Range
Set rr = Selection
Call My_InClip(InLine(rr))
End Sub

Function My_InClip(str_inClip As String)
Dim d As New DataObject
d.SetText (str_inClip)
d.PutInClipboard
End Function

В чем беда?
Винвдовс 10 64, Ексель 2019  
Страницы: 1
Наверх