Mise en couleur d'une cellule
Résolu
titeuf136
Messages postés
91
Date d'inscription
vendredi 15 janvier 2010
Statut
Membre
Dernière intervention
19 octobre 2012
-
28 mars 2010 à 14:57
cs_Le Pivert Messages postés 7902 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 novembre 2023 - 28 mars 2010 à 17:57
cs_Le Pivert Messages postés 7902 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 novembre 2023 - 28 mars 2010 à 17:57
A voir également:
- Mise en couleur d'une cellule
- Vba mise en forme cellule ✓ - Forum Visual Basic
- Vba copier valeur cellule dans une autre feuille ✓ - Forum Visual Basic
- Mise en forme conditionnelle VBA excel ✓ - Forum Visual Basic 6
- Inverser couleur photoshop - Forum Graphisme/design
- Couleur fluo - Forum Graphisme/design
5 réponses
NHenry
Messages postés
15090
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
6 novembre 2023
158
28 mars 2010 à 15:19
28 mars 2010 à 15:19
Bonjour,
évite les mélanges, c'est soit :
Cells(i, 25).Interior.Color = Cells(i, 20).Interior.Color
soit :
Cells(i, 25).Interior.ColorIndex= Cells(i, 20).Interior.ColorIndex
mais pas un mix.
Mon site
évite les mélanges, c'est soit :
Cells(i, 25).Interior.Color = Cells(i, 20).Interior.Color
soit :
Cells(i, 25).Interior.ColorIndex= Cells(i, 20).Interior.ColorIndex
mais pas un mix.
Mon site
cs_Le Pivert
Messages postés
7902
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 novembre 2023
137
28 mars 2010 à 17:22
28 mars 2010 à 17:22
Bonjour,
J'ai bien ce code un peu simpliste si c'est cela que tu recherches:
Private Sub CommandButton1_Click()
If Range("A1").Interior.Color = RGB(255, 0, 0) Then ' 'Rouge
Range("B1").Interior.Color = RGB(255, 0, 0) 'Rouge
End If
End Sub
@+ Le Pivert
J'ai bien ce code un peu simpliste si c'est cela que tu recherches:
Private Sub CommandButton1_Click()
If Range("A1").Interior.Color = RGB(255, 0, 0) Then ' 'Rouge
Range("B1").Interior.Color = RGB(255, 0, 0) 'Rouge
End If
End Sub
@+ Le Pivert
titeuf136
Messages postés
91
Date d'inscription
vendredi 15 janvier 2010
Statut
Membre
Dernière intervention
19 octobre 2012
1
28 mars 2010 à 16:38
28 mars 2010 à 16:38
En fait j'ai bien essayé les deux combinaisons mais sans succès, je vais chercher si une autre erreur c'est glissé dans mon code
titeuf136
Messages postés
91
Date d'inscription
vendredi 15 janvier 2010
Statut
Membre
Dernière intervention
19 octobre 2012
1
28 mars 2010 à 17:25
28 mars 2010 à 17:25
mon erreur a été de mettre en couleur des cellules puis de les fusionner avec des cellules qui n'avaient aucune couleur de fond.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
cs_Le Pivert
Messages postés
7902
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 novembre 2023
137
28 mars 2010 à 17:57
28 mars 2010 à 17:57
Je ne comprends pas. Ce n'est pas de la programmation. Il suffit de sélectionner les cellules concernées et de supprimer le format.
