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

Textbox sichtbar/unsichtbar

Forumthread: Textbox sichtbar/unsichtbar

Textbox sichtbar/unsichtbar
05.12.2007 16:43:00
Thomas
Hallo Excel Forum,
wie kann man eine Textbox sichtbar/ unsichtbar machen,
in Abhängigkeit eines Zellwertes?
Soll heißen ist A1 ungleich Null dann Textbox sichtbar, sonst unsichtbar.
Bitte um Hilfe und grüß euch.
Thomas

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textbox sichtbar/unsichtbar
05.12.2007 16:53:21
Hajo_Zi
Hallo Thoams
Textbox1.Visible=Range("A1")""

AW: Textbox sichtbar/unsichtbar
05.12.2007 17:07:00
Thomas
Klappt nicht, aber das liegt bestimmt an mir.
Hab ganz wenig bis keine VBA Kenntnisse, kannst du mir etwas detaillierter
schreiben, was ich machen muss?
Frage: Ist Textbox das gleiche wie Textfeld? Dieses Feld (mit meiner Meldung) nennt sich Textfeld 41
Gruß
Thomas

Anzeige
AW: Textbox sichtbar/unsichtbar
05.12.2007 17:14:26
Jens
Hallo Thomas
Ist die Textbox auf dem Tabellenblatt, oder in einer Userform?
Gruß aus dem Sauerland
Jens

AW: Textbox sichtbar/unsichtbar
05.12.2007 17:15:00
Thomas
Hallo Jens,
ist nur auf dem Tabellenblatt. Ist eine Behelfsmäßige Fehlermeldung, die eingeblendet werden soll.
Gruß aus Mittelfranken

AW: Textbox sichtbar/unsichtbar
05.12.2007 17:32:21
Jens
Hi Thomas
ALT+F11
links oben Doppelklick auf die Tabelle, in der die Textbox steht und in das Fenster rechts folgenden Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1")  0 Then
TextBox41.Visible = True
Else
TextBox41.Visible = False
End If
End Sub


Gruß aus dem Sauerland
Jens

Anzeige
AW: Textbox sichtbar/unsichtbar
05.12.2007 17:49:00
Thomas
Jawoll Jens, so hab ich mir das vorgestellt.
Ist zwar irgendwie am Anfang nicht gelaufen, aber jetzt scheint es zu gehen.
Danke schön!

AW: Textbox sichtbar/unsichtbar
05.12.2007 17:54:00
Hajo_Zi
Hallo Thomas,
da reicht aber auch eine Zeile Statt 5, siehe mein Beitrag.
Gruß Hajo

Anzeige
Gern geschehen :-) oT
05.12.2007 18:13:00
Jens
;
Anzeige
Anzeige

Infobox / Tutorial

Textbox sichtbar/unsichtbar in Excel


Schritt-für-Schritt-Anleitung

Um eine Textbox in Excel sichtbar oder unsichtbar zu machen, abhängig von einem Zellwert, folge diesen Schritten:

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

  2. Wähle das richtige Blatt aus: Doppelklicke auf das Tabellenblatt, wo sich die Textbox befindet.

  3. Füge den Code ein: Kopiere folgenden VBA-Code in das Fenster:

    Private Sub Worksheet_Change(ByVal Target As Range)
       If Range("A1") <> 0 Then
           TextBox41.Visible = True
       Else
           TextBox41.Visible = False
       End If
    End Sub
  4. Schließe den VBA-Editor: Speichere deine Änderungen und schließe den Editor.

  5. Teste deine Lösung: Ändere den Wert in Zelle A1, um zu sehen, ob die Textbox entsprechend sichtbar oder unsichtbar wird.


Häufige Fehler und Lösungen

  • Textbox wird nicht sichtbar: Stelle sicher, dass der Name der Textbox korrekt ist (z.B. TextBox41). Prüfe auch, ob der Zellwert in A1 tatsächlich ungleich Null ist.
  • VBA-Code wird nicht ausgeführt: Vergewissere dich, dass die Makros in deiner Excel-Version aktiviert sind. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen.
  • Text unsichtbar machen: Wenn der Text in der Textbox unsichtbar ist, überprüfe die Schriftfarbe. Stelle sicher, dass die Schriftfarbe nicht mit dem Hintergrund übereinstimmt.

Alternative Methoden

Falls Du keine VBA-Kenntnisse hast, kannst Du auch eine Formellösung in Excel verwenden:

  1. Setze eine Formel in eine Zelle, die auf A1 verweist. Zum Beispiel:
    =WENN(A1<>0; "Textbox ist sichtbar"; "")
  2. Verwende diese Zelle als Anzeigefeld, um den Status der Textbox anzuzeigen.

Diese Methode macht den Text zwar nicht unsichtbar, bietet jedoch eine einfache Möglichkeit, den Status anzuzeigen.


Praktische Beispiele

  • Beispiel 1: Wenn Du eine Fehlermeldung in einer Textbox anzeigen möchtest, kannst Du den Code anpassen, um spezifische Nachrichten zu zeigen.
  • Beispiel 2: Setze eine zusätzliche Bedingung, um die Textbox nur bei bestimmten Werten sichtbar zu machen, z.B.:
    If Range("A1") = 5 Then
       TextBox41.Visible = True
    Else
       TextBox41.Visible = False
    End If

Tipps für Profis

  • Verwende benannte Bereiche: Statt auf Zelle A1 zu verweisen, kannst Du einen benannten Bereich verwenden, um den Code flexibler zu gestalten.
  • Fehlerbehandlung einbauen: Füge Fehlerbehandlungsroutinen in Deinen VBA-Code ein, um unerwartete Fehler abzufangen.
  • Wende die Sichtbarkeit auf mehrere Textboxen an: Wenn Du mehrere Textboxen hast, kannst Du den Code in einer Schleife anpassen, um deren Sichtbarkeit gleichzeitig zu steuern.

FAQ: Häufige Fragen

1. Ist eine Textbox dasselbe wie ein Textfeld? Ja, in Excel wird oft der Begriff Textfeld verwendet, aber es handelt sich um dasselbe Element, das Du sichtbar oder unsichtbar machen kannst.

2. Wie kann ich die Schrift in der Textbox unsichtbar machen? Um die Schrift in einer Textbox unsichtbar zu machen, kannst Du die Schriftfarbe auf die gleiche Farbe wie den Hintergrund setzen:

TextBox41.ForeColor = RGB(255, 255, 255) ' Weiß auf Weiß

Dies macht den Text unsichtbar, während die Textbox sichtbar bleibt.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige