Comparaison de format (VBA)

[fourmi4x]

Bonsoir à tout le forum,

Je bute sur un petit problème : je souhaiterai effectuer un test de condition à partir du format de la valeur qui est dans la cellule.

J'ai essayé avec "Format(...)" mais je ne pense pas que ce soit la bonne formule.

Voici le code essayé :

For i = 3 To 15

If Format(Cells(i, 3)) <> Format(Range("B2")) Then
Cells(i, 4).Interior.ColorIndex = 3
Else: Cells(i, 4).Interior.ColorIndex = 4

End If
Next i

Merci à ceux qui auront le temps de m'aider

Xavier

(Ci-joint un mini exemple plus visuel).

 

[pierrejean]

Re : Comparaison de format (VBA)

re fourmi4x

une solution valable pour le fichier

est-elle suffisamment générale ????

 

[Banzai64]

Re : Comparaison de format (VBA)

Bonsoir

Une étude mais ......

 

[fourmi4x]

Re : Comparaison de format (VBA)

De nouveau merci pierrejean

C'est assez général et cela m'a aiguillé sur d'autres expressions similaires.

Banzai64, regarde la solution de pierrejean qui a rajouté une condition IsDate, qui corrige le problème.

Merci beaucoup pour votre aide, ce forum est vraiment une mine d'or

Cdt,
Xavier