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

Wert eines CommandButton in TextBox schreiben

Forumthread: Wert eines CommandButton in TextBox schreiben

Wert eines CommandButton in TextBox schreiben
01.03.2009 19:30:52
Frank
Hallo Zusammen und 'nen schönen Sonntagabend!!!
Bin überfordert! Ich habe in einer UF eine TextBox6. Dann gibt es eine zweite UF, auf der befinden sich mehrere CommandButton mit Werten, z.B. 50,00, 100,00 usw. Nun möchte ich das bei Klick auf solch Button der Wert in die TextBox6 der ersten UF geschrieben wird.
Ich hoffe ihr könnt helfen und sage vorab Danke!!!
Gruß Frank H.
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert eines CommandButton in TextBox schreiben
01.03.2009 19:44:18
Josef
Hallo Frank,
vom Prinzip her so.

UserForm1.TextBox6 = CommandButton1.Caption


Gruß Sepp

AW: Wert eines CommandButton in TextBox schreiben
01.03.2009 19:45:18
Daniel
Hi
mal grundsätzlich:
Commandbuttons haben eigentlich keine Werte, du meinst sicherlich irgend was anderes, wahrscheinlich "Caption" (das ist der angezeigte Text des Commandbuttons).
um von einer Userform aus eine andere zu verändern, kanns du so vorgehen:

Userform1.Textbox5.Text = Commandbutton1.Caption 


dh. einfach bei der Objekt-Refernzierung einfach die Userform mit dazuschreiben.
die vollständige Objektreferenzierung wäre eigentlich:
Workbook - Userform - Steuerelement (Textbox, Commandbutton usw).
immer dann wenn sich das angesprochene Steuerelement im gleichen Objekt (Workbook, Userform) befindet, in dem man grade den Code schreibt, kann man die Referenzierung weglassen, befindet es sich in einem anderen Objekt, muss man die Refrenzierung hinzunehmen.
der Code muss in das Makro "Commandbutton1_Click.
Gruß, Daniel

Anzeige
AW: Wert eines CommandButton in TextBox schreiben
01.03.2009 20:06:11
Frank
Hallo Ihr beide!!!
Hatte auch 'ne Lösung, aber wesentlich umständlicher!!! Beides funzt von euch Super!!!
Herzlichst Dank, der Abend ist gerettet und ich kann entspannt schlafen!!!
Gruß Frank H.
;
Anzeige
Anzeige

Infobox / Tutorial

Wert eines CommandButton in TextBox schreiben


Schritt-für-Schritt-Anleitung

Um den Wert eines CommandButton in eine TextBox deiner UserForm zu schreiben, folge diesen Schritten:

  1. Öffne den Visual Basic for Applications (VBA) Editor in Excel (Alt + F11).

  2. Füge eine neue UserForm hinzu, falls du das noch nicht getan hast.

  3. Platziere eine TextBox (z.B. TextBox6) und einen oder mehrere CommandButtons auf der UserForm.

  4. Doppelklicke auf den CommandButton, um das Codefenster zu öffnen.

  5. Füge den folgenden Code in das Click-Ereignis des CommandButtons ein:

    UserForm1.TextBox6.Text = CommandButton1.Caption
  6. Stelle sicher, dass du die korrekte Referenz für UserForm1 und CommandButton1 verwendest, je nach deinen Objektnamen.

  7. Schließe den VBA Editor und teste die UserForm.


Häufige Fehler und Lösungen

  • Fehler: "Objekt nicht gefunden"

    • Lösung: Überprüfe, ob die Namen der UserForm und der Steuerelemente korrekt geschrieben sind. Achte auf die Groß- und Kleinschreibung.
  • Fehler: TextBox bleibt leer

    • Lösung: Stelle sicher, dass der Code im Click-Ereignis des richtigen CommandButtons eingefügt wurde.

Alternative Methoden

Anstatt den Wert aus einem CommandButton zu holen, kannst du auch andere Steuerelemente verwenden, um Daten in die TextBox zu schreiben. Beispielsweise könntest du:

  • Ein Label verwenden, um Text anzuzeigen und diesen Text in die TextBox zu kopieren.
  • Eine ComboBox verwenden, um mehrere Werte auszuwählen und den ausgewählten Wert in die TextBox zu schreiben.

Hier ein Beispiel mit einer ComboBox:

UserForm1.TextBox6.Text = ComboBox1.Value

Praktische Beispiele

Hier sind einige Beispiele, die dir helfen, den Code besser zu verstehen:

  1. CommandButton mit festem Wert:

    Private Sub CommandButton1_Click()
        UserForm1.TextBox6.Text = "50,00"
    End Sub
  2. CommandButton mit dynamischem Wert:

    Private Sub CommandButton2_Click()
        UserForm1.TextBox6.Text = CommandButton2.Caption
    End Sub

Tipps für Profis

  • Nutze die vollständige Objektre

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