XL 2010 couleur cellule en fonction des couleurs de MFC

  • Initiateur de la discussion Initiateur de la discussion gh4
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

gh4

XLDnaute Occasionnel
bonjour a tous,
j'aimerai colorer une cellule simple en fonction du résultat couleur de 2 MFC
mon code me renvoie une erreur 438 en ligne 10
Sub Macro1()
Dim couleur As Long
couleur = RGB(255, 0, 0)
lign = 3
colon = 3
Cells(lign, colon).Select

If Cells(lign + 1, 2) = "C" Then
If Cells(lign + 1, colon).DisplayFormat.Interior.Color = couleur Then
10 Cells(lign, colon).Interior.Color = couleur
GoTo 920
End If
End If

If Cells(lign + 2, 2) = "C" Then
If Cells(lign + 2, colon).DisplayFormat.Interior.Color = couleur Then
Cells(lign, colon).Interior.Color = couleur
GoTo 920
End If
End If
Cells(lign, colon).Interior.Color = RGB(255, 255, 255)

920
End Sub
par avance merci
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Microsoft 365 Probléme VBA
Réponses
8
Affichages
233
  • Question Question
XL 2021 VBA excel
Réponses
4
Affichages
79
Réponses
2
Affichages
423
Réponses
2
Affichages
757
Réponses
0
Affichages
379
Retour