Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
188to192
188to192
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

TextBox - Inhalt kopieren

Forumthread: TextBox - Inhalt kopieren

TextBox - Inhalt kopieren
03.12.2002 19:11:28
andreas
Hallo Leute,

ich wollte mal fragen, wie und ob es geht mittels eines CommandButtons den Inhalt einer TextBox in die Zwischenablage zu kopieren.
Danke schon mal fuer eure Hilfe!

Gruss
andreas

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: TextBox - Inhalt kopieren
03.12.2002 19:20:12
Ralf Sögel
Schau dir mal folgendes an:
DataObject
GetFromClipboard
Re: TextBox - Inhalt kopieren
03.12.2002 19:59:48
andreas
Hallo Ralf,

Danke.
Aber das klappt nur, wenn meine TextBox im UserForm ist. Meine TextBox ist in der Tabelle.
Ich moecht den Text in der TextBox mit Hilfe eines CommandButtons in die Zwischenablage kopieren um ihn dann z.B. in ein Word Dokument einzufuegen.
Ist das moeglich??

Gruss
andreas

Anzeige
Re: TextBox - Inhalt kopieren
03.12.2002 20:18:01
Ralf Sögel
Da ich keine controls in einer Tabelle benutze, weiß ich das auch nicht.
Falsch, das geht auch...
03.12.2002 20:34:41
Ralf Sögel
Ins Modul der Tabelle, TakeFocusOnClick des Button auf False:
Dim TestDaten As DataObject
Private Sub CommandButton1_Click()
Set TestDaten = New DataObject
TestDaten.SetText TextBox1.Text
TestDaten.PutInClipboard
End Sub

Nun kannst du mit Strg+v in word einfügen.

Anzeige
Re: Falsch, das geht auch...
03.12.2002 20:42:45
andreas
Genauso hab ich es mir gedacht.
Es klappt super.

Vielen Dank!!!!

;

Forumthreads zu verwandten Themen

Beim Kopieren eines Tabellenblattes den VBA-Code e
Alfi

Hallo Excel-Gemeinde!
ich habe eine mehrblättrige Datei, per Makro kopiere ich ein Blatt und speichere dieses unter neuem Namen ab.
Dieses Blatt soll aber nicht mehr den VBA-Code der ursprübglichen Datei enthalten, sprich ein Blatt ohne Makros.
Wer kann mir helfen?
So sieht der...
09.09.2008 09:58:00
Thread-ID: 1008333
8 Beiträge
Textinhalte aus Zellen zusammenkopieren
zehetner

Liebe Profis,
ich habe die Ergebnisse einer Befragung in ein Excel-Sheet eingegeben, jeder Befragte in ein Registerblatt. Nun möchte ich die Antworten der Befragten, die in Textfeldern (immer in den selben, zB E145 stehen) gesammelt in eine neue Tabelle bringen.
Ziel ist es, die Antwort...
21.09.2008 18:29:25
Thread-ID: 1011343
2 Beiträge
VBA--Zellen finden/vergleichen/kopieren
Christian

Hallo
einen Beispieldatei ist anbei!!
Bisher konnte ich mit folgendem Code Zellinhalte "täglich" teilen und in neue Zellen kopieren.
Sheets("179").Select Range("B255").End(xlUp).Offset(1, 0).Select ActiveCell.FormulaR1C1 = "=TRIM(LEFT('tägliche Statistik'!R12C6,FIND(""/"",'täglic...
07.10.2008 10:15:00
Thread-ID: 1014634
3 Beiträge
Anzeige
In Zwischenablage kopieren
Claudia

Hallo liebe VBA-Profis,
ich habe eine sehr einfache Bitte. Ich möchte die Daten aus den ersten drei Spalten (ab Zeile 2 einschließlich der letzten befüllten Zelle in Spalte A) mittelsn Makro in die Zwischenablage kopieren. Mehr nicht. :-)
Ich könnte das natürlich mit der Hand machen, d...
15.12.2008 18:19:49
Thread-ID: 1033106
4 Beiträge
Kopieren von Werten in TExtBox
Werten

Hallo,
ich möchte gerne einen Wert von Tabelle2 in eine TextBox in Tabelle1 übergeben, habe aber irgendwie den falschen Code:
Worksheets("Tabelle2").Cells(42, 11).Copy
Worksheets("Tabelle1").TextBox1.Value.PasteSpecial Paste:=xlPasteValues
Ausserdem würde ich gerne die TextBox...
17.01.2009 00:55:00
Thread-ID: 1040842
11 Beiträge
VBA Code mit VBA in Tabelle kopieren - Fehler?!
Andreas

Hallo Herber Fans,
ich habe mir heute aus der Recherche eine Möglichkeit rausgesucht, einen Code über VBA in ein anderes VBA Worksheet zu kopieren. Das dies in VBA überhaupt geht ist ja schon genial. Es soll ein Code in das VBA Worksheet des activeworkbooks kopiert werden.
Der Code dafü...
11.02.2009 15:56:00
Thread-ID: 1049657
3 Beiträge
suchen kopieren einfügen vba
Bea

Hallo zusammen
Ich hab folgendes Problem.
in der angehängten Beispielmappe möchte ich, das die in Arbeitsblatt "Nummern" hinterlegten Anfänge von Telefonnummern in Arbeitsblatt "evnachweis" gesucht die jeweiligen Zeilen kopiert und dann in Arbeitsblatt in dem Fall "Februar" (am besten...
10.03.2009 11:55:49
Thread-ID: 1058557
9 Beiträge
Anzeige
variable Zeilenanzahl kopieren, einfügen (VBA)
Alex

Hallo Leute,
In meiner Arbeitsmappe kopiere ich eine! Zeile (aus dem TabBlatt „Grundformular“) - via Doppelklick auf einen Namen in „Übersicht“ - in andere TabBlätter.
(das geht wunderbar)
Sieht jemand eine Möglichkeit ob/wie das ganze mit einer variablen Zeilenanzahl, die im „Grund...
18.03.2009 17:23:56
Thread-ID: 1061522
3 Beiträge
Anzeige
Mit VBA Zeilen in neue Register kopieren
Andreas

Ein Tabellenblatt soll nach einem bestimmten Kriterium durchsucht werden. Immer wenn das Suchkriterium gefunden wird, soll die Zeile kopiert und in ein neues Tabellenblatt eingefügt werden. Dies soll solange geschehen bis alle Zeilen durchsucht worden sind.
Im Detail soll dies wie folgt fun...
08.06.2009 12:29:49
Thread-ID: 1079883
3 Beiträge
Gesperrte Zellen in Zwischenablage kopieren
Elias

Hallo Forum,
ich habe eine Tabelle, in welcher ein Datenbereich von B5:B20 per Button in die Zwischenablage kopiert werden soll.
Der Kram mit dem Button ist alles kein Problem, aber die Crux ist:
-Die Zellen sind gesperrt.
-Das PW darf nicht im VBA-Code hinterlegt werden, da das...
13.06.2009 23:26:05
Thread-ID: 1081337
6 Beiträge
Text finden und kopieren
Bodo_Bachmann69

Hallo,
ich habe folgendes Problem:
Ich habe in Spalte A einen Text stehen und möchte in Spalte B einen Teil davon kopieren (per Formel).
Soweit bin ich derzeit (ALLE ANGABEN OHNE " AM ANFANG UND AM ENDE):
Zu kopierender Teil (aus Spalte A):
"R7878A"
____________________...
16.11.2009 22:44:42
Thread-ID: 1117790
8 Beiträge
VBA-Projekt innerhalb Datei kopieren
Gregor

Hallo Excel-Profis
Folgendes Problem, dass ich trotz intensiver Recherche nicht gelöst bekomme:
Möchte das VBA-Projekt der Arbeitsmappe("2") mit dem VBA-Projekt der Arbeitsmappe("1") überschreiben.
(beide Blätter sind in einer Datei).
Kann mir jemand helfen?
Vielen Dank!
...
03.12.2009 13:09:19
Thread-ID: 1121578
7 Beiträge
Anzeige

Infobox / Tutorial

TextBox-Inhalt mit CommandButton in die Zwischenablage kopieren

Schritt-für-Schritt-Anleitung

Um den Inhalt einer TextBox mithilfe eines CommandButtons in die Zwischenablage zu kopieren, folge diesen Schritten:

  1. Öffne Excel und gehe zu deinem Arbeitsblatt. Stelle sicher, dass die Entwicklertools aktiviert sind.

  2. Füge eine TextBox und einen CommandButton hinzu.

    • Gehe zu „Entwicklertools“ > „Einfügen“ und wähle „TextBox“ und „Button“ aus.

  3. Füge den folgenden VBA-Code in das Modul der Tabelle ein:

    Dim TestDaten As DataObject

Private Sub CommandButton1_Click()
   Set TestDaten = New DataObject
   TestDaten.SetText TextBox1.Text
   TestDaten.PutInClipboard
End Sub

  4. Testen: Klicke auf den CommandButton. Der Text sollte jetzt in der Zwischenablage sein und kann mit Strg+V in ein anderes Dokument, wie z.B. Word, eingefügt werden.

Häufige Fehler und Lösungen

  • Fehler: Der Code funktioniert nicht, es wird kein Text kopiert.

    • Lösung: Stelle sicher, dass die Bibliothek „Microsoft Forms 2.0 Object Library“ aktiviert ist. Gehe zu „Extras“ > „Verweise“ und aktiviere sie.

  • Fehler: Die TextBox ist nicht im UserForm.

    • Lösung: Der oben angegebene Code funktioniert auch für TextBoxen, die direkt auf einem Arbeitsblatt platziert sind. Stelle sicher, dass der Code im richtigen Modul eingefügt ist.

Alternative Methoden

  • Verwendung von „GetFromClipboard“: Eine andere Möglichkeit ist, den Inhalt aus der Zwischenablage zu holen, anstatt ihn dorthin zu kopieren. Dies könnte nützlich sein, wenn du Inhalte aus anderen Quellen verarbeiten möchtest.

  • Direct Copy: Wenn du nur einfache Texte kopieren möchtest, kannst du auch die Windows-Funktionalität nutzen, indem du die TextBox auswählst und mit Strg+C kopierst.

Praktische Beispiele

  1. TextBox in einem UserForm: Wenn du eine TextBox in einem UserForm hast, kannst du den gleichen Code verwenden, um den Inhalt zu kopieren.

  2. Mehrere TextBoxen: Du kannst den Code anpassen, um Inhalte aus mehreren TextBoxen in die Zwischenablage zu kopieren. Beispiel:

    Private Sub CommandButton1_Click()
   Set TestDaten = New DataObject
   TestDaten.SetText TextBox1.Text & " " & TextBox2.Text
   TestDaten.PutInClipboard
End Sub

Tipps für Profis

  • Verwende „With“ für mehrere Objekte: Wenn du mehrere TextBoxen oder Controls bearbeiten möchtest, nutze die „With“-Anweisung, um den Code übersichtlicher zu gestalten.

  • Fehlerbehandlung einfügen: Füge Fehlerbehandlungsroutinen hinzu, um unerwartete Fehler abzufangen und benutzerfreundliche Fehlermeldungen anzuzeigen.

FAQ: Häufige Fragen

1. Frage
Kann ich den Inhalt einer TextBox direkt in eine Excel-Zelle kopieren?
Antwort: Ja, du kannst den gleichen Code verwenden, aber anstelle der Zwischenablage den Text direkt in eine Zelle setzen, z.B. Range("A1").Value = TextBox1.Text.

2. Frage
Welches Excel-Version benötige ich für diesen Code?
Antwort: Der Code sollte in Excel 2007 und höher funktionieren, solange die Entwicklertools aktiviert sind.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige