Macro avec couleur Fermé

Question

Bonjour, 

Je suis actuellement en stage et je cherche a faire un tableau automatique mais j'ai un problème. Je cherche a avoir un mot lorsque dans mes cellule j'ai la couleur orange et rouge mais j'ai des erreur qui fait que cela ne fonctionne pas. Voici le code, je sais qu'il manque un truc mais je sais pas quoi mettre.

    Dim delav As Range
    
    With sheets("J-5").Range("B3:P3").Select
    
    If delav.Font.ColorIndex = 45 Then Range("B10") = "PR Lav"
    If delav.Font.ColorIndex = 3 Then Range("B10") = "PR Lav"
    
    End With

jordane45 · Answer

Bonjour,

1 -  Pour poster du code sur le forum.. merci d'utiliser la coloration syntaxique (les balises de code).
Explications disponibles ici : https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code 

2 - 

-Que fait ce "SELECT" ici ?? Change la ligne de code
With sheets("J-5").Range("B3:P3").Select 
 par 
With sheets("J-5").Range("B3:P3") 
- Que vaut ta variable delav  ?
- Quel est le message d'erreur ?
- Sur quelle ligne apparait-il ?

Macro avec couleur

1 réponse

Discussions similaires