Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1776to1780
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
Schriftfarbe der Ceckbox ändern
24.08.2020 19:41:59
Marko
Hallo, ich möchte die Schriftfarbe der Checkbox mit folgendem Code ändern. Warum funktioniert die Farbänderung nicht?
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
CheckBox1.Font.ColorIndex = 10 'grüne Schriftfarbe
Range("Y10").Value = "Auswertung Gesamt"
Range("BA9").Value = 1
Else
CheckBox1.Font.ColorIndex = 1 'schwarze Schriftfarbe
Range("BA9").Value = 0
Range("Y10").Value = "Auswertung"
End If
End Sub

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Schriftfarbe der Ceckbox ändern
24.08.2020 20:14:17
Werner
Hallo,
Private Sub CheckBox1_Click()
If CheckBox1 Then
CheckBox1.ForeColor = &H8000&
Range("Y10").Value = "Auswertung Gesamt"
Range("BA9").Value = 1
Else
CheckBox1.ForeColor = &H0&
Range("BA9").Value = 0
Range("Y10").Value = "Auswertung"
End If
End Sub
Gruß Werner
AW: Schriftfarbe der Ceckbox ändern
24.08.2020 20:15:27
onur
Versuche statt
CheckBox1.Font.ColorIndex = 10

das
CheckBox1.Forecolor = RGB(100,255,100)

AW: Schriftfarbe der Ceckbox ändern
24.08.2020 23:27:12
GerdL
Moin

Private Sub CheckBox1_Click()
CheckBox1.ForeColor = CheckBox1 * -32768
Range("BA9") = CheckBox1 * -1
Range("Y10") = "Auswertung" & IIf(CheckBox1, " gesamt", "")
End Sub
Gruß Gerd
Anzeige

292 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige