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

Forumthread: Vba Userform: Textbox automatisch befüllen

Vba Userform: Textbox automatisch befüllen
21.01.2018 07:16:54
kocius
Hallo Community,
bräuchte Eure Hilfe.
Habe ein Userform mit zwei Comboboxen und einem Textbox kreiert.
Vorgehensweise: wähle in beiden Comboboxen was aus, drücke auf die Button "anzeigen" und im Textbox erscheint ein gewisser Text.
Frage1: ist es möglich, dass nachdem in Comboboxen was ausgewählt wird erscheint der Text im Textbox automatisch? Das Drücken auf den Button "anzeigen" soll entfallen. Wenn ja, hat jemand eine Idee wie?
Frage2: Kann ich die Comboboxfläche "direkt" anklicken, nicht den "umgedrehten Dreieck" auf der rechte Seite von Combobox?
Anbei die Datei:
https://www.herber.de/bbs/user/119126.xlsm
Danke im Voraus!
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Vba Userform: Textbox automatisch befüllen
21.01.2018 07:43:33
Matthias
Hallo
Private Sub cmbCode_Change()
cmbFirma.Text = ""
Me.txtBeschreibung = ""
End Sub
Private Sub cmbFirma_Change()
If Me.cmbFirma = "" And Me.cmbCode = "" Then Exit Sub
CommandButton1 = True
End Sub

Gruß Matthias
AW: Vba Userform: Textbox automatisch befüllen
21.01.2018 08:34:15
kocius
Danke! Hat super geklappt!
Anzeige
;

Forumthreads zu verwandten Themen

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

Textbox in VBA Userform automatisch befüllen


Schritt-für-Schritt-Anleitung

Um die Textbox in einer VBA Userform automatisch zu befüllen, sobald eine Auswahl in den Comboboxen getroffen wird, befolge diese Schritte:

  1. Öffne die VBA-Entwicklungsumgebung: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Wähle die Userform aus: Klicke im Projektfenster auf die Userform, die du erstellt hast.

  3. Füge den Code hinzu: Doppelklicke auf die erste Combobox (z. B. cmbFirma) und füge folgenden Code ein:

    Private Sub cmbFirma_Change()
       If Me.cmbFirma <> "" Then
           Me.txtBeschreibung = "Der Text für " & Me.cmbFirma
           ' Füge hier die Logik für die zweite Combobox hinzu, falls nötig
       End If
    End Sub
  4. Wiederhole den Vorgang für die zweite Combobox: Füge ähnlichen Code in die Change-Ereignisprozedur der zweiten Combobox ein.

  5. Teste die Userform: Schließe den VBA-Editor und teste deine Userform. Die Textbox sollte sich automatisch befüllen, wenn du eine Auswahl in den Comboboxen triffst.


Häufige Fehler und Lösungen

  • Textbox bleibt leer: Überprüfe, ob die Comboboxen tatsächlich eine Auswahl haben. Der Code muss sicherstellen, dass die Textbox nur befüllt wird, wenn eine Auswahl getroffen wurde.
  • Fehlermeldung beim Ausführen: Achte darauf, dass die Namen der Controls korrekt sind. Überprüfe, ob cmbFirma und txtBeschreibung exakt so benannt sind.

Alternative Methoden

Eine alternative Methode zur automatischen Befüllung der Textbox könnte die Verwendung von Worksheet_Change-Ereignissen sein, wenn die Daten direkt in einem Arbeitsblatt bearbeitet werden. Diese Methode ist jedoch weniger gebräuchlich für Userforms.


Praktische Beispiele

Hier ist ein praktisches Beispiel, das zeigt, wie du eine Textbox in einem VBA Userform mit zwei Comboboxen verknüpfen kannst:

Private Sub cmbCode_Change()
    If Me.cmbCode <> "" Then
        Me.txtBeschreibung = "Auswahl: " & Me.cmbCode
    End If
End Sub

In diesem Beispiel wird die Textbox txtBeschreibung mit dem Text befüllt, der der Auswahl in der cmbCode-Combobox entspricht.


Tipps für Profis

  • Nutze die Select Case-Anweisung, um unterschiedliche Texte je nach Auswahl in den Comboboxen anzuzeigen. Dies kann die Lesbarkeit und Wartbarkeit deines Codes erhöhen.
  • Achte darauf, die Benutzeroberfläche der Userform ansprechend zu gestalten. Eine klare Struktur erleichtert die Nutzung.

FAQ: Häufige Fragen

1. Kann ich die Combobox direkt anklicken?
Ja, du kannst die Combobox so einstellen, dass sie bei einem Klick auf die Fläche anstelle des Dropdown-Pfeils reagiert. Das erfordert jedoch zusätzliche Programmierung, um das Verhalten der Controls anzupassen.

2. Funktioniert das in Excel 2016?
Ja, die vorgestellten Methoden sind in Excel 2016 und auch in anderen Versionen von Excel anwendbar, solange du mit VBA arbeiten kannst.

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