PutInClipboard ergibt 2 Quadrate ?
25.06.2019 16:42:58
Berny
entweder ich oder mein Rechner spinnt. (Zu heiß?)
ich versuche "ganz" einfach", mein, im Modul erstelltes Ergebnis in die Zwischenablage zu schieben. Ich bekomme aber immer nur 2 Quadrate (�� hier sind es Rauten mit Fragezeichen) wenn ich den Inhalt der Zwischenablage verwende.
Der Verweis auf MicrosoftForms 2.0 Objekt Libary ist gesetzt.
Hier der entscheidende Ausschnitt aus dem Modul.
Public M_MW, M1, M2, M3, Teil, BezWi As String
Sub Zwischenablage()
BezWi = "test"
'Daten in Zwischenablage
Dim ZwAbl As New DataObject
With ZwAbl
.SetText BezWi
.PutInClipboard
End With
End Sub
M.f.G.
Berny