If Range And... I don't know

Le
PhilPhil
Bonjour la communauté,

Je souhaiterais qu’Excel sélectionne tout seul, la cellule A1 si la police
de la cellule A4 est rouge ET que le fond de la cellule est de couleur “40”.
J’ai bien pensé à faire :

Sub Test()
If Range("A4").Interior.ColorIndex = 40 And Range("A4").Font.Color =
-16776961 And Range("A4").TintAndShade = 0 Then
Range("A1").Select
End If
End Sub

MAIS Excel ne pense pas comme moi, alors pour ne pas le contrarier, je
souhaiterais un coup de pouce de votre part afin d’avoir la formule magique
qui ferait tourner le « bazar ».

MERCI d’avance.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
FFO
Le #19769221
Salut à toi

Mets comme ceci :

If Range("A4").Interior.ColorIndex = 40 And Range("A4").Font.Color = 255 Then
Range("A1").Select
End If

Celà devrait faire

Dis moi !!!!
PhilPhil
Le #19772211
Bonjour FFO,

Ton code fonctionne.
MERCI

"FFO" a écrit :

Salut à toi

Mets comme ceci :

If Range("A4").Interior.ColorIndex = 40 And Range("A4").Font.Color = 255 Then
Range("A1").Select
End If

Celà devrait faire

Dis moi !!!!



PhilPhil
Le #19772201
Bonjour FFO,

Ton code fonctionne
MERCI

"FFO" a écrit :

Salut à toi

Mets comme ceci :

If Range("A4").Interior.ColorIndex = 40 And Range("A4").Font.Color = 255 Then
Range("A1").Select
End If

Celà devrait faire

Dis moi !!!!



Publicité
Poster une réponse
Anonyme