etienne33 XLDnaute Nouveau 30 Août 2012 #1 Bonjour à tous, Voilà je suis à la recherche d'une formule pour faire une incrémentation par rapport aux données d'une cellule. Dans la colonne A, j'ai une suite de chiffre : Si la cellule suivante est égale alors dans B1 +1 Si la cellule suivante est une nouvelle valeur on repart à 1 Si une valeur déjà comptée plus haut réapparait, je ne veux pas que le comptage continue, je souhaite que ça reparte à 1. Ci-joint un échantillon du fichier, ce sera surement plus clair. Si vous avez des questions, je reste à votre disposition. Merci Pièces jointes Classeur1.xlsx 8.6 KB · Affichages: 59 Classeur1.xlsx 8.6 KB · Affichages: 53 Classeur1.xlsx 8.6 KB · Affichages: 65
Bonjour à tous, Voilà je suis à la recherche d'une formule pour faire une incrémentation par rapport aux données d'une cellule. Dans la colonne A, j'ai une suite de chiffre : Si la cellule suivante est égale alors dans B1 +1 Si la cellule suivante est une nouvelle valeur on repart à 1 Si une valeur déjà comptée plus haut réapparait, je ne veux pas que le comptage continue, je souhaite que ça reparte à 1. Ci-joint un échantillon du fichier, ce sera surement plus clair. Si vous avez des questions, je reste à votre disposition. Merci
V VDAVID XLDnaute Impliqué 30 Août 2012 #2 Re : Incrémenter avec condition Bonjour Etienne33, Peut-être en C2: =SI(A2=A1;C1+1;1) Bonne journée Vote positif 0 Vote négatif
J JHA XLDnaute Barbatruc 30 Août 2012 #3 Re : Incrémenter avec condition Bonjour à tous, A essayer en "B2" et tirer vers le bas =SI(ET(A1=A2;NB.SI($A$2:A2;A2)>1)=VRAI;C1+1;1) Cliquez pour agrandir... JHA Vote positif 0 Vote négatif
Re : Incrémenter avec condition Bonjour à tous, A essayer en "B2" et tirer vers le bas =SI(ET(A1=A2;NB.SI($A$2:A2;A2)>1)=VRAI;C1+1;1) Cliquez pour agrandir... JHA
phlaurent55 Nous a quittés en 2020 Repose en paix 30 Août 2012 #4 Re : Incrémenter avec condition Bonjour Etienne, avec ce code: Code: Sub classement() For i = 2 To Range("A65535").End(xlUp).Row If Cells(i - 1, 1) <> Cells(i, 1) Then Cells(i, 2) = 1 Else Cells(i, 2) = Cells(i - 1, 2) + 1 End If Next i End Sub à+ Philippe Bing: Bonjour JHA, David Dernière édition: 30 Août 2012 Vote positif 0 Vote négatif
Re : Incrémenter avec condition Bonjour Etienne, avec ce code: Code: Sub classement() For i = 2 To Range("A65535").End(xlUp).Row If Cells(i - 1, 1) <> Cells(i, 1) Then Cells(i, 2) = 1 Else Cells(i, 2) = Cells(i - 1, 2) + 1 End If Next i End Sub à+ Philippe Bing: Bonjour JHA, David
phlaurent55 Nous a quittés en 2020 Repose en paix 30 Août 2012 #5 Re : Incrémenter avec condition Re, ou alors cette formule en B2 à recopier vers le bas Code: =SI(A1<>A2;1;B1+1) à+ Philippe Vote positif 0 Vote négatif
Re : Incrémenter avec condition Re, ou alors cette formule en B2 à recopier vers le bas Code: =SI(A1<>A2;1;B1+1) à+ Philippe
etienne33 XLDnaute Nouveau 30 Août 2012 #6 Re : Incrémenter avec condition Bonjour à tous et merci pour votre réactivité, J'ai essayé les deux formules mais ça ne fonctionne pas. Cependant, j'ai essayé ta macro Philippe et elle fonctionne très bien. Elle réponds vraiment à mon besoin. Je vous remercie tous pour votre contribution, si besoin je reviendrais vers vous mais il y a pas de raison. P.S : Est-il possible d'avoir un descriptif du code, étape par étape, pour essayer de comprendre le processus ? Merci à bientôt. Vote positif 0 Vote négatif
Re : Incrémenter avec condition Bonjour à tous et merci pour votre réactivité, J'ai essayé les deux formules mais ça ne fonctionne pas. Cependant, j'ai essayé ta macro Philippe et elle fonctionne très bien. Elle réponds vraiment à mon besoin. Je vous remercie tous pour votre contribution, si besoin je reviendrais vers vous mais il y a pas de raison. P.S : Est-il possible d'avoir un descriptif du code, étape par étape, pour essayer de comprendre le processus ? Merci à bientôt.
phlaurent55 Nous a quittés en 2020 Repose en paix 30 Août 2012 #7 Re : Incrémenter avec condition Re, J'ai essayé les deux formules mais ça ne fonctionne pas. Cliquez pour agrandir... les 3 formules données (David, JHA et la mienne) ainsi que le code donnent le même résultat les formules ont-elles été copiées en B2 ou C2 comme indiqué dans les réponses apportées ? ...... et les formules sont préférables à du code, c'est bien plus rapide à+ Philippe Vote positif 0 Vote négatif
Re : Incrémenter avec condition Re, J'ai essayé les deux formules mais ça ne fonctionne pas. Cliquez pour agrandir... les 3 formules données (David, JHA et la mienne) ainsi que le code donnent le même résultat les formules ont-elles été copiées en B2 ou C2 comme indiqué dans les réponses apportées ? ...... et les formules sont préférables à du code, c'est bien plus rapide à+ Philippe
etienne33 XLDnaute Nouveau 31 Août 2012 #8 Re : Incrémenter avec condition Je n'avais pas vu ta réponse avec ta formule lors de mon dernier message. J'ai essayé les deux 1ères formules et ça n'avait pas fonctionné hier, je viens de réessayé et ça marche ce coup-ci. J'ai finalement choisi la dernière formule. Merci à tous. Vote positif 0 Vote négatif
Re : Incrémenter avec condition Je n'avais pas vu ta réponse avec ta formule lors de mon dernier message. J'ai essayé les deux 1ères formules et ça n'avait pas fonctionné hier, je viens de réessayé et ça marche ce coup-ci. J'ai finalement choisi la dernière formule. Merci à tous.