Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA Code: Inhalt Textbox1 zwischenablage kopieren

VBA Code: Inhalt Textbox1 zwischenablage kopieren
19.09.2013 14:59:47
Bernd
Hallo zusammen,
hab wunder gedacht wie einfach, von wegen.
Wer kann mir sagen wie der Code aussehen muss wenn ich den Inhalt aus UF1 Textbox1 in die Zwischenablage kopieren will.
Danke im Voraus !!!
Gruß
Bernd

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Code: Inhalt Textbox1 zwischenablage kopieren
19.09.2013 15:07:04
Hajo_Zi
Hallo Bernd,
Option Explicit
Private Sub TextBox1_AfterUpdate()
Dim objCache As New DataObject
objCache.SetText TextBox1
objCache.PutInClipboard
Set objCache = Nothing
End Sub

Anzeige
AW: VBA Code: Inhalt Textbox1 zwischenablage kopieren
19.09.2013 15:24:27
Bernd
Hallo Ihr Beiden,
Danke passt!!!
Gruß
Bernd

AW: VBA Code: Inhalt Textbox1 zwischenablage kopieren
19.09.2013 15:09:04
Rudi
Hallo,
Recherche-Archivsuche 'zwischenablage'
der erste Treffer:
Sub kopieren()
Dim objClip As dataobject
Set objClip = New dataobject
strTmp = Cells(1, 1).Value
objClip.SetText strTmp
objClip.PutInClipboard
End Sub

Gruß
Rudi

Anzeige
AW: VBA Code: Inhalt Textbox1 zwischenablage kopieren
19.09.2013 15:25:48
Bernd
Hallo Ihr Beiden,
Danke passt!!!
Gruß
Bernd
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

VBA Code: Inhalt von Textbox1 in die Zwischenablage kopieren


Schritt-für-Schritt-Anleitung

  1. Öffne deine Excel-Datei und gehe in den VBA-Editor. Dies kannst du tun, indem du ALT + F11 drückst.

  2. Füge ein UserForm hinzu: Rechtsklick im Projekt-Explorer > Einfügen > UserForm.

  3. Füge eine Textbox hinzu: Wähle die Textbox aus der Toolbox und ziehe sie auf das UserForm.

  4. Öffne den Code-Editor für das UserForm, indem du einen Doppelklick auf das UserForm machst.

  5. Füge den folgenden VBA-Code ein, um den Text aus TextBox1 in die Zwischenablage zu kopieren:

    Option Explicit
    Private Sub TextBox1_AfterUpdate()
       Dim objCache As New DataObject
       objCache.SetText TextBox1.Text
       objCache.PutInClipboard
       Set objCache = Nothing
    End Sub
  6. Speichere deine Änderungen und schließe den VBA-Editor.

  7. Teste das UserForm: Gib Text in TextBox1 ein und verlasse die Textbox, um den Text in die Zwischenablage zu kopieren.


Häufige Fehler und Lösungen

  • Fehler: "User-defined type not defined"

    • Lösung: Stelle sicher, dass du eine Referenz zu "Microsoft Forms 2.0 Object Library" in den VBA-Referenzen gesetzt hast.
  • Problem: Text wird nicht kopiert

    • Lösung: Achte darauf, dass du nach dem Eingeben des Textes die TextBox verlässt (z.B. durch Drücken der Enter-Taste oder Klicken außerhalb der TextBox).

Alternative Methoden

Falls du keine UserForms verwenden möchtest, kannst du auch einen einfachen Sub-Code verwenden, um den Inhalt einer Zelle in die Zwischenablage zu kopieren. Beispiel:

Sub kopieren()
    Dim objClip As DataObject
    Set objClip = New DataObject
    strTmp = Cells(1, 1).Value
    objClip.SetText strTmp
    objClip.PutInClipboard
End Sub

Dieser Code kopiert den Inhalt der Zelle A1 in die Zwischenablage.


Praktische Beispiele

Wenn du den Code in einem UserForm benutzt, kannst du den Text aus TextBox1 ganz einfach in ein anderes Programm einfügen, nachdem du ihn in die Zwischenablage kopiert hast. Dies ist besonders nützlich, wenn du häufig Texte aus Excel in andere Anwendungen übertragen musst.


Tipps für Profis

  • Nutze Application.CutCopyMode = False, um den Zwischenspeicher zu leeren, falls du mit großen Datenmengen arbeitest.
  • Für Mac-Nutzer: Denke daran, dass die Mac Zwischenablage anders funktioniert. Achte darauf, dass du die richtigen Bibliotheken verwendest.

FAQ: Häufige Fragen

1. Wie kann ich den Inhalt der Zwischenablage anzeigen?
Die Zwischenspeicher anzeigen-Funktion ist nicht standardmäßig in Excel integriert, du kannst jedoch ein benutzerdefiniertes VBA-Skript erstellen, um den Inhalt anzuzeigen.

2. Funktioniert dieser Code in Excel für Mac?
Ja, der Code funktioniert in Excel für Mac, solange du die richtige Referenz zur Microsoft Forms 2.0 Object Library gesetzt hast. Beachte, dass es möglicherweise Unterschiede in der Handhabung der Zwischenablage gibt.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige