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

Forumthread: In userform aktive Textbox farbiger Hintergrund

In userform aktive Textbox farbiger Hintergrund
18.10.2007 10:44:00
maruseru
Hallo werte Profis
Aufgrund der guten Antworten und Tips steht nun meine Userform. Nun folgend die kleinen Verbesserungen. Wie kann ich den Hintergrund der aktiven Textbox oder Combobox auf Gelb stellen wenn ich mit dem Tabulator in die jeweilige Box springe?
Danke und Gruss
Maruseru

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: In userform aktive Textbox farbiger Hintergrun
18.10.2007 10:54:00
Hoffi
Hallo,
Das geht im Enter Ereigniss der Text oder ComboBox:

Private Sub ComboBox1_Enter()
ComboBox1.BackColor = &HFFFF&
End Sub


oder


Private Sub TextBox1_Enter()
TextBox1.BackColor = &HFFFF&
End Sub


Grüße
Hoffi

Anzeige
AW: In userform aktive Textbox farbiger Hintergrun
18.10.2007 10:59:17
maruseru
Hallo Hoffi
Vielen Dank für deine schnelle Antwort, klappt wunderbar und werde ich nun gleich für die anderen Boxen adoptieren.
Gruss
Maruseru

AW: In userform aktive Textbox farbiger Hintergrun
18.10.2007 11:11:23
maruseru
Hallo werter Hoffi
Wenn ich nun in die nächste Box springe sollte nun diese farbig werden und die vorherige Box wieder weiss. Weiter gibt es eine Liste der Farbcodes den du verwendet hast?.
Danke und Gruss
Maruseru

Anzeige
AW: In userform aktive Textbox farbiger Hintergrun
18.10.2007 11:23:43
Jens
Hi Maruseru
Im VBA-Editor unter Eigenschaften werden Dir die Farbcodes doch angezeigt. Wenn Du dort die Eigenschaft "Backcolor" änderst, wird Dir dort der zugehörige Farbcode angezeigt.

Private Sub TextBox1_Enter()
TextBox1.BackColor = &HFFFF&
End Sub



Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.BackColor = &H80000005
End Sub


Gruß aus dem Sauerland
Jens

Anzeige
AW: In userform aktive Textbox farbiger Hintergrun
18.10.2007 12:59:50
maruseru
Hallo Jens
Auch Dir ganz herzlichen Dank, wieder was gelernt.
Gruss
Maruseru
;
Anzeige
Anzeige

Infobox / Tutorial

Aktive Textbox in Userform farblich hervorheben


Schritt-für-Schritt-Anleitung

Um den Hintergrund der aktiven Textbox oder Combobox in einer Userform farblich zu ändern, kannst du die folgenden Schritte befolgen:

  1. Öffne den VBA-Editor in Excel (Alt + F11).
  2. Wähle die Userform aus, in der du die Änderungen vornehmen möchtest.
  3. Füge für jede Textbox oder Combobox den folgenden Code in das entsprechende Ereignis ein:
Private Sub ComboBox1_Enter()
    ComboBox1.BackColor = &HFFFF&
End Sub

Private Sub TextBox1_Enter()
    TextBox1.BackColor = &HFFFF&
End Sub

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    TextBox1.BackColor = &H80000005 ' Setze die Hintergrundfarbe zurück
End Sub
  1. Wiederhole den Vorgang für weitere Textboxen oder Comboboxen, indem du den Code anpasst.

Häufige Fehler und Lösungen

  • Problem: Die Hintergrundfarbe ändert sich nicht.

    • Lösung: Stelle sicher, dass der Code im richtigen Ereignis (Enter oder Exit) platziert ist und dass du die richtige Textbox oder Combobox angesprochen hast.
  • Problem: Die Hintergrundfarbe bleibt nach dem Verlassen der Box gleich.

    • Lösung: Füge das Exit-Ereignis hinzu, um die Hintergrundfarbe zurückzusetzen.

Alternative Methoden

Eine alternative Methode zur Anpassung der Farben ist die Verwendung von Farbcodes aus der Excel-Farbpalette. Du kannst die Farben direkt im Eigenschaftenfenster der Userform sehen und dort auch anpassen.

  1. Klicke auf die Textbox oder Combobox in der Userform.
  2. Gehe zu den Eigenschaften (F4).
  3. Ändere die BackColor-Eigenschaft manuell, um verschiedene Farben zu testen.

Praktische Beispiele

Hier sind einige Beispiele, wie du die Hintergrundfarbe für mehrere Textboxen in einer Userform anpassen kannst:

Private Sub TextBox1_Enter()
    TextBox1.BackColor = &HFFFF&
    TextBox2.BackColor = &H80000005 ' Zurücksetzen der vorherigen Box
End Sub

Private Sub TextBox2_Enter()
    TextBox2.BackColor = &HFFFF&
    TextBox1.BackColor = &H80000005 ' Zurücksetzen der vorherigen Box
End Sub

In diesem Beispiel wird die Box, in die du springst, gelb, während die vorherige Box wieder weiß wird.


Tipps für Profis

  • Experimentiere mit verschiedenen Farbcodes, um die Benutzeroberfläche ansprechender zu gestalten.
  • Verwende das MouseEnter-Ereignis, um die Farbe auch zu ändern, wenn die Maus über die Box fährt.
  • Halte deine Userform übersichtlich und achte auf die Zugänglichkeit durch Farbkontraste.

FAQ: Häufige Fragen

1. Wie finde ich die Farbcode-Referenzen?
Du kannst im VBA-Editor unter den Eigenschaften der Textbox oder Combobox nachsehen. Dort wird dir der Farbcode angezeigt, wenn du die BackColor-Eigenschaft änderst.

2. Funktioniert das auch in Excel 365?
Ja, die oben genannten Schritte und Codes funktionieren in Excel 365 sowie in älteren Versionen, die VBA unterstützen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige