Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel ForeColor ?

ForeColor ?

2 réponses
Avatar
Michel
Bonsoir,
le ForeColor ne fonctionne pas ???
Comment faire
Merci beaucoup
Michel

Private Sub UserForm_Initialize()
If Sheets("plan").Range("C4") <> "" Then
CommandButton1.Caption = "Fiche n° 1 saisie"
CommandButton1.ForeColor.vbRed
End If
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
michdenis
Bonjour Michel,

CommandButton1.ForeColor = vbRed


Salutations!


"Michel" a écrit dans le message de news:%
Bonsoir,
le ForeColor ne fonctionne pas ???
Comment faire
Merci beaucoup
Michel

Private Sub UserForm_Initialize()
If Sheets("plan").Range("C4") <> "" Then
CommandButton1.Caption = "Fiche n° 1 saisie"
CommandButton1.ForeColor.vbRed
End If
Avatar
Michel
Oups, ben oui !
Shame on me
Merci beaucoup Denis
Michel

"michdenis" a écrit dans le message de news:

Bonjour Michel,

CommandButton1.ForeColor = vbRed


Salutations!


"Michel" a écrit dans le message de
news:%
Bonsoir,
le ForeColor ne fonctionne pas ???
Comment faire
Merci beaucoup
Michel

Private Sub UserForm_Initialize()
If Sheets("plan").Range("C4") <> "" Then
CommandButton1.Caption = "Fiche n° 1 saisie"
CommandButton1.ForeColor.vbRed
End If