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

einzelne Steuerelemente ausblenden

Forumthread: einzelne Steuerelemente ausblenden

einzelne Steuerelemente ausblenden
02.01.2018 11:12:29
Felix
Hallo zusammen,
auf der Suche nach der Lösung nach einem ziemlich speziellen Problem
bin ich auf diese/s großartige Homepage/Forum gestoßen :-) und hoffe
natürlich, dass einer von Euch mir als totalem VBA-Anfänger eine
Hilfestellung/Lösung anbieten kann.
Schon mal danke im Voraus!!!
Die im Beitrag
https://www.herber.de/forum/archiv/884to888/884839_Formular_Steuerelemente_einu_ausblenden.html
angebotene Lösung https://www.herber.de/bbs/user/43927.xls
kommt meinem Problem schon sehr nahe. Nur möchte ich nicht pauschal
alle anderen Steuerelemente ausblenden sondern nur einzelne Gruppen:
Das zu erstellende Formular erfordert einige Auswahlmöglichkeiten
(z.B. Optionsbutton), die wiederum - bei z.B. "ja" - weitere
Steuerelemente einblenden sollen. Wird hingegen "nein" geklickt,
sollen diese weiteren Elemente ausgeblendet bleiben/werden.
Im gesamten Formular werde ich mind. 8 solcher verschachtelter
Steuerelement-Gruppen brauchen.
Für Hilfe jeglicher Art bin ich sehr dankbar!
Beste Grüße - Felix aus Essen
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: einzelne Steuerelemente ausblenden
02.01.2018 11:19:03
Sepp
Hallo Felix,
das geht vom Prinzip her so.
Private Sub OptionButton1_Click()
With OptionButton1
  TextBox1.Visible = .Value  'Eingeblendet wenn An
  CommandButton1.Visible = .Value
  TextBox2.Visible = Not .Value 'Ausbeblendet wen An
End With
End Sub

Private Sub OptionButton2_Click()
With OptionButton2
  TextBox1.Visible = .Value
  CommandButton1.Visible = Not .Value
  TextBox2.Visible = .Value
End With
End Sub

Gruß Sepp

Anzeige
AW: einzelne Steuerelemente ausblenden
02.01.2018 12:54:09
Felix
Hallo Sepp,
vielen Dank für die schnelle und kompetente Hilfe!!!
Damit komme ich sicher weiter. :-)
Viele Grüße aus dem wolkigen Essen und noch ein gesundes Neues!
Felix
Anzeige

Infobox / Tutorial

Einzelne Steuerelemente in Excel ausblenden

Schritt-für-Schritt-Anleitung

Um einzelne Steuerelemente in Excel auszublenden, kannst Du VBA (Visual Basic for Applications) verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Füge ein Formular hinzu: Klicke im Menü auf "Einfügen" und wähle "UserForm".

  3. Füge Steuerelemente hinzu: Ziehe einige OptionButtons, TextBoxes und CommandButtons in das Formular.

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

  5. Füge den folgenden Code ein:

    Private Sub OptionButton1_Click()
    With OptionButton1
        TextBox1.Visible = .Value  ' Eingeblendet wenn An
        CommandButton1.Visible = .Value
        TextBox2.Visible = Not .Value  ' Ausbeblendet wenn An
    End With
End Sub

Private Sub OptionButton2_Click()
    With OptionButton2
        TextBox1.Visible = .Value
        CommandButton1.Visible = Not .Value
        TextBox2.Visible = .Value
    End With
End Sub

  6. Schließe den VBA-Editor und kehre zu Deinem Formular zurück.

  7. Teste das Formular: Klicke auf die OptionButtons, um zu sehen, wie die Steuerelemente ein- und ausgeblendet werden.

Diese Methode ermöglicht es Dir, gezielt bestimmte Steuerelemente basierend auf der Auswahl des Benutzers auszublenden.

Häufige Fehler und Lösungen

  • Fehler: Steuerelemente blenden sich nicht aus

    • Lösung: Überprüfe, ob die Visible-Eigenschaft der Steuerelemente korrekt gesetzt ist. Achte darauf, dass der richtige OptionButton ausgewählt ist.

  • Fehler: VBA-Code wird nicht ausgeführt

    • Lösung: Stelle sicher, dass Du im richtigen Codefenster arbeitest und dass keine Syntaxfehler im Code vorhanden sind.

Alternative Methoden

Wenn Du keine VBA-Programmierung verwenden möchtest, kannst Du auch die Funktion "Datenüberprüfung" nutzen, um Auswahlmöglichkeiten zu erstellen. Hierbei kannst Du Dropdown-Listen verwenden, um Benutzerentscheidungen zu treffen, und die Sichtbarkeit der Steuerelemente manuell steuern.

Praktische Beispiele

Hier ist ein einfaches Beispiel für ein Formular mit zwei OptionButtons. Wenn "Ja" ausgewählt wird, erscheinen zwei TextBoxes, andernfalls bleiben sie verborgen.

  1. OptionButton1: "Ja"
  2. OptionButton2: "Nein"
  3. TextBox1: sichtbar, wenn "Ja" gewählt
  4. TextBox2: sichtbar, wenn "Nein" gewählt

Nutze den oben genannten VBA-Code, um dieses Beispiel in Deinem Excel-Formular zu implementieren.

Tipps für Profis

  • Nutze Variablen: Anstelle von festen Bezeichnern wie TextBox1 ist es oft hilfreich, Variablen zu verwenden, um den Code leserlicher und flexibler zu gestalten.
  • Sichtbarkeit von Gruppen: Wenn Du komplexe Formulare erstellst, kannst Du ganze Gruppen von Steuerelementen in ein Frame einfügen, um die Sichtbarkeit einfacher zu steuern.

FAQ: Häufige Fragen

1. Frage
Kann ich auch andere Steuerelemente wie ListBox oder ComboBox auf ähnliche Weise ein- und ausblenden?
Antwort: Ja, Du kannst die Sichtbarkeit aller Steuerelemente in Excel VBA auf die gleiche Weise steuern.

2. Frage
Funktioniert dieser Ansatz in Excel 365?
Antwort: Ja, der VBA-Code ist mit Excel 365 kompatibel und funktioniert in den meisten Versionen von Excel.

Beliebteste Forumthreads (12 Monate)

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