2 Textboxen in 1 Zelle

Forumthread: 2 Textboxen in 1 Zelle

14.01.2007 22:40:01

Christian

Hallo alle zusammen,
ich habe das Problem, dass ich die Texte aus 2 Textboxen, in einer userform in eine Zelle (A1) übertragen möchte. Wie ist das über vba möglich? Eine Textbox übertragen ist kein Problem. Die zweite Textbox überschreibt jedoch die erste.

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: 2 Textboxen in 1 Zelle

14.01.2007 22:48:23

Jan
AW: 2 Textboxen in 1 Zelle

14.01.2007 22:58:15

praetorius

AW: 2 Textboxen in 1 Zelle

14.01.2007 22:48:23

Jan

[a1] = Textbox1 & Textbox2
mdg Jan

AW: 2 Textboxen in 1 Zelle

14.01.2007 22:58:15

praetorius

Die Antwort von Jan ist zwar verkürzt, aber korrekt. Etwas ausführlicher wäre gewesen:
Sheets(1).range("A1").value = Textbox1.text & " " & Textbox2.Text
Du benennst also zuerst die Tabelle und die Zelle, in die du das Ergebnis schreiben willst. Anschließend weist du der Zelle den Text zu, der in den beiden Textboxen steht. Das geschieht durch einfache Verkettung mit dem Zeichen &. Da du beliebig viele Texte miteinander verketten - also aneinander hängen - kannst, empfiehlt es sich, noch ein Leerzeichen, Komma o.ä. einzufügen.

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um zwei Textboxen in einer UserForm in eine Zelle (z.B. A1) zu übertragen, kannst du VBA verwenden. Folge diesen Schritten:

Öffne die Excel-Datei und gehe zu den Entwicklertools.
Erstelle eine UserForm mit zwei Textboxen (Textbox1 und Textbox2).
Füge einen Button hinzu, mit dem der Text in die Zelle geschrieben wird.
Öffne den VBA-Editor (Alt + F11) und wähle die UserForm aus.

Füge den folgenden Code in das Click-Ereignis des Buttons ein:

Sheets(1).Range("A1").Value = Textbox1.Text & " " & Textbox2.Text

Schließe den VBA-Editor und teste die UserForm. Wenn du auf den Button klickst, sollten die Texte aus beiden Textboxen in der Zelle A1 erscheinen.

Häufige Fehler und Lösungen

Fehler: Die erste Textbox wird überschrieben.
- Lösung: Achte darauf, dass du die Texte beider Textboxen richtig verkettst, wie im obigen Schritt beschrieben.
Fehler: Die Zelle bleibt leer.
- Lösung: Stelle sicher, dass Textbox1 und Textbox2 tatsächlich Texte enthalten, bevor du den Code ausführst.

Alternative Methoden

Eine alternative Methode, um die Texte aus zwei Textboxen zusammenzuführen, ist die Verwendung von Excel-Formeln. Du kannst die Texte auch direkt in der Excel-Tabelle kombinieren, indem du folgende Formel in eine Zelle eingibst:

=Textbox1 & " " & Textbox2

Diese Methode funktioniert ohne VBA, setzt jedoch voraus, dass die Textboxen auf ein Arbeitsblatt verlinkt sind.

Praktische Beispiele

Angenommen, du hast die folgende Situation:

Textbox1 enthält "Hallo"
Textbox2 enthält "Welt"

Wenn du den obigen VBA-Code ausführst, wird in der Zelle A1 der Text "Hallo Welt" angezeigt. Dies ist eine einfache Methode, um Excel 2 Textfelder zusammenzuführen und die Benutzerinteraktion zu verbessern.

Tipps für Profis

Nutze Fehlerbehandlung in deinem VBA-Code, um sicherzustellen, dass unerwartete Eingaben nicht zu einem Absturz der UserForm führen.
Überlege, ob du die Texte aus den Textboxen mit zusätzlichen Formatierungen (z.B. Großbuchstaben) versehen möchtest, bevor du sie in die Zelle schreibst.

FAQ: Häufige Fragen

1. Frage: Kann ich mehr als zwei Textboxen zusammenführen?
Antwort: Ja, du kannst beliebig viele Textboxen zusammenführen, indem du sie einfach wie folgt verkettst: Textbox1.Text & " " & Textbox2.Text & " " & Textbox3.Text.

2. Frage: Funktioniert dieser Code in allen Excel-Versionen?
Antwort: Der VBA-Code sollte in den meisten Excel-Versionen ab 2007 funktionieren. Achte jedoch darauf, dass die Entwicklertools aktiviert sind.

Beliebteste Forumthreads (12 Monate)