Problè à rédiger un scripte vba

avyrex1926 Messages postés 360 Date d'inscription dimanche 3 décembre 2006 Statut Membre Dernière intervention 3 janvier 2012 - 31 juil. 2008 à 22:43
crn_c21 Messages postés 302 Date d'inscription samedi 24 janvier 2004 Statut Membre Dernière intervention 4 février 2011 - 31 juil. 2008 à 22:58
Bonjour,


Je voudrais de l'aide pour un script VBA excel svp?


Dans ma feuille 1, dans la colonne A, ce trouve 2 mots. Sois Fruits ou Viandes.


Je voudrais que quand je clique sur le bouton vba, qu'il me mette un numéro qui incrémenterai de 1 à chaque fois.


Exemple :

dans la cellule A4 = Fruits qui deviendrait Fruits1

dans la cellule A5 = Fruits qui deviendrait Fruits2

dans la cellule e A3 = Viandes qui deviendrait Viandes1

dans la cellule e A4 = Fruits qui deviendrait Fruits3

dans la cellule e A5 = Viandes qui deviendrait Viandes2


etc. jusqu'à la dernière donnée inscrite dans la colonne A.


Comment faire S.V.P.
A voir également:

1 réponse

crn_c21 Messages postés 302 Date d'inscription samedi 24 janvier 2004 Statut Membre Dernière intervention 4 février 2011
31 juil. 2008 à 22:58
il faut tout d'abord initialiser 3 variables (Ligne,NbFruit et NbViande) à 1
Ensuite dans une boucle tant que la cellule A & ligne n'est pas vide:
    si la cellue A & ligne ="fruits" alors elle vaut "fruits" & NbFruit et NbFruit=NbFruit+1
    si la cellue A & ligne ="Viandes" alors elle vaut "Viandes" & NbViande et NbViande =NbViande +1
    Ligne=ligne+1
0
Rejoignez-nous