Herbers Excel-Forum - das Archiv
Zwischenablage
Betrifft: Zwischenablage
von: Nick
Geschrieben am: 24.09.2003 14:46:39
Hi,
ich hoffe es hat einer ne Lösung für mein Problem. Und zwar wenn ich diesen Code ausführe meldet er "Fehler beim Kompilieren: Benutzerdefinierter Type nich denfiniert" kann mir einer Helfen
Option Explicit
Dim ZwischenAblage As DataObject
Sub TextInZwischenablageEinfügen()
Dim Text As String
Set ZwischenAblage = New DataObject
Text = Sheets("Tabelle5").Range("A1").Value
With ZwischenAblage
.SetText Text
.PutInClipboard
End With
Set ZwischenAblage = Nothing
End Sub
Schon mal im voraus Danke
Nick
Betrifft: AW: Zwischenablage
von: BerndE
Geschrieben am: 24.09.2003 14:50:22
Hi Nick,
nur ein Tipp ohne zu testen...
Die Dim-Anweisung solltest Du nach 'Sub' setzen (nicht davor).
Gruß
Bernd
www.bernds.page.de.vu
Betrifft: AW: Zwischenablage
von: Nick
Geschrieben am: 24.09.2003 14:57:04
Hi Bernd,
das hab ich schon versucht. Er bleibt dann immer an "Dim ZwischenAblage As DataObject" hängen
Danke schon im voraus
Nick
Betrifft: AW: Zwischenablage -noch offen-
von: BerndE
Geschrieben am: 24.09.2003 15:06:48
habe Deinen Code jetzt getestet und ...
bei mir funktioniert's !?!
Liegt wohl an einer Einstellung (nicht am Code).
Gruß
Bernd
www.bernds.page.de.vu
Betrifft: AW: Zwischenablage -noch offen-
von: Nick
Geschrieben am: 24.09.2003 15:10:06
Hi Bernd,
kannst du mir vielleicht sagen welche Einstellung das wäre.
Danke schon im voraus
Nick
Betrifft: AW: Zwischenablage -noch offen-
von: BerndE
Geschrieben am: 24.09.2003 15:12:00
weil ich das nicht kann (leider) habe ich den Thread mit -noch offen- bezeichnet.
Tut mir leid.
Gruß
Bernd
Betrifft: AW: Zwischenablage -noch offen-
von: Nick
Geschrieben am: 24.09.2003 15:13:27
Trotzdem Danke für deine Hilfe
nick
Betrifft: AW: Zwischenablage -noch offen-
von: BerndE
Geschrieben am: 24.09.2003 15:21:43
nichts zu danken...
Betrifft: AW: Zwischenablage
von: GerdW
Geschrieben am: 24.09.2003 15:40:18
Verweis auf die Forms2.0 muss gesetzt sein!
Gerd
Betrifft: AW: Zwischenablage
von: Nick
Geschrieben am: 24.09.2003 16:05:29
Hi Gerd,
wie setzt ich diesen Verweis bin nämlich VBA-Leihe
Danke schon im voraus
Nick
Betrifft: AW: Zwischenablage
von: GerdW
Geschrieben am: 24.09.2003 18:57:03
Mit Alt+F11 in die VBE
Menü Extras|Verweise und dort den Haken bei
Microsoft Forms 2.0 Object Library setzen
und mit OK bestätigen.
Gerd