DataObject
15.09.2004 22:26:02
Werner
Bei diesen Makro von Hans, erhalte ich folgende Fehlermeldung:
Fehler beim Kompilieren:
Benutzerdefinierter Typ nicht definiert
und "ClipAbLage As DataObject" ist markiert!
Fehlt da ev. noch ein Verweis? wenn ja welcher?
Sub Var2ClipBoard()
Dim ClipAbLage As DataObject
Dim Txt$
Set ClipAbLage = New DataObject
Txt = InputBox("Variablenwert:", , "Hallo!")
ClipAbLage.SetText Txt
ClipAbLage.PutInClipboard
ActiveSheet.Paste
End Sub
Danke für eure Hilfe gruss Werner