Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
804to808
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
804to808
804to808
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Textbox einfärben

Textbox einfärben
27.09.2006 12:37:29
MArkus
Hi zusammen
Ist es möglich eine Textbox auf einer Userform einzufärben wenn auf dem Tabellenblatt eine Zahl steht?
Also:
Auf Tabelle1 in A1 steht eine 1, die Textbox1 färbt sich rot.
Auf Tabelle1 in A1 steht eine 2, die Textbox1 färbt sich blau.
Auf Tabelle1 in A1 steht eine 3, die Textbox1 färbt sich gelb.
Vielen Dank für die Hilfe
Gruß
MArkus

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

Betreff
Datum
Anwender
Anzeige
AW: Textbox einfärben
27.09.2006 13:31:14
xlSchnack
Hi Markus,

Private Sub UserForm_Initialize()
Select Case Range("A1").Value
Case 1: Label1.BackColor = RGB(255, 124, 128) 'Rot
Case 2: Label1.BackColor = RGB(51, 153, 255) 'Blau
Case 3: Label1.BackColor = RGB(255, 255, 102) 'Gelb
End Select
End Sub

Salut
Korrektur
27.09.2006 13:39:32
xlSchnack
Entschuldigung, es muss im Code immer TextBox1 statt Label1 heißen.
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige