comparaison deux colones + conditions

[angely06]

Bonjour à tous,

J'ai un fichier avec deux colonnes, et j'aimerai comparer colonne p avec colonne o qui sont remplis de date ligne par ligne
Si il y a la même date on ne touche pas, si il n'y a pas la même date on applique une couleur decriture rouge vif.
Ma feuille s'apelle historique dates.
je ne peux pas vous faire parvenir le fichier car il est cobfidentiel.

Merci de votre aide

 

[tototiti2008]

Re : comparaison deux colones + conditions

Bonjour angely06,

bienvenue sur XLD

Tu peux envisager une mise en forme conditionnelle (MFC)
tu sélectionnes de O2 à la fin de la colonne O
Menu format - mise en forme conditionnelle
La formule est

=O2<>P2

choisis ta couleur grâce au bouton Format
OK
OK

 

[tdenfert]

Re : comparaison deux colones + conditions

Bonjour,

sélectionner les colonnes O et P ; format mise en forme conditionnelle; choisir la formule est :
taper =$O1<>$P1 choisir motif rouge


edit : bonjour Tototiti2008

 

[angely06]

Re : comparaison deux colones + conditions

Sauf que je fais des mises à jour réguliere et donc la nolone p et o change tous le temps, elle se decale, et je sais pas si cela continuerai a marcher?:-

Edit: je suis sur ma tablette donc je tape pas super bien^^C

 

[WUTED]

Re : comparaison deux colones + conditions

Bonjour angely06,

Voici une procédure vba qui fait ce que tu veux, essai quand même de joindre un fichier exemple la prochaine fois même avec de fausses informations. J'ai pas testé cette fonction dans si ça ne fonctionne pas comme tu voudrais, n'hésites pas. Et c'est dans la cas où tes donnés sont sur ta feuille nommée "Feuil1", t'as juste à remplacer Feuil1 par le nom de ta feuille si ce n'est pas le cas.

Sub ComparaisonDate()
     For i = 1 To Sheets("Feuil1").Range("A1048576").End(xlUp).Row
              if Sheets("Feuil1").Range("A" & i ).Offset(0,14).Value <>_ 
              Sheets("Feuil1").Range("A" & i ).Offset(0,15).Value Then
                       Sheets("Feuil1").Range("A" & i ).Offset(0,14).Font.ColorIndex = 3
                       Sheets("Feuil1").Range("A" & i ).Offset(0,15).Font.ColorIndex = 3
              End if
     Next
End Sub

Bonne journée,
WUTED

 

[angely06]

Re : comparaison deux colones + conditions

Donc je remplace feuille 1 par historique dates? Et a paro???

 

[WUTED]

Re : comparaison deux colones + conditions

Si "historique dates" est le nom de ta feuille, oui.

Et a paro???

 

[angely06]

Re : comparaison deux colones + conditions

Par o lol, le nom de m colonne je doit la comparer avec p, donc a =o et i =p?

 

[WUTED]

Re : comparaison deux colones + conditions

Nan nan tu laisses ça, tu changes juste le nom de la feuille.

 

[angely06]

Re : comparaison deux colones + conditions

Ok merci je vais essayer

 

[angely06]

Re : comparaison deux colones + conditions

Il me met les trois premiere ligne enrouge et me dis erreur de compilation

 

[WUTED]

Re : comparaison deux colones + conditions

Re,

Est-ce que tu pourrai mettre ton fichier en pièce jointe? Changes les valeurs si nécessaires, ou au moins un "mini" fichier.

 

[angely06]

Re : comparaison deux colones + conditions

La macro ou le fichier

 

[WUTED]

Re : comparaison deux colones + conditions

Re,

Ton fichier excel complet, avec tes feuilles et la macro.

 

[angely06]

Re : comparaison deux colones + conditions

Ok mis ce ser des fausses