Incrémenter cellule par combobox

[Béarn.com]

Dans ma combobox je peux sélectionner 3 valeurs (AL, FO, MO). Lorsque j'en sélectionne une, je voudrais que celà m'incrémente une cellule.
Je m'explique
Imaginons la colonne A :
En A1 : AL1
A2 : AL2
A3 : AL3
A4 : FO1
A5 : MO1
A6 : MO2
Si je sélectionne AL dans ma combobox, je voudrais voir apparaitre en A7 : AL4.
Avez vous une idée de la solution ?
Cordialement

 

[vgendron]

Bonjour à toi aussi....
tu parles de "Ma combobox".. peut on présumer que tu as déjà un fichier avec cette fameuse combobox... ??
une idée? oui..

range("A" &rows.count).end(xlup).offset(1,0)=combobox & max+1
max ayant été déterminé au préalable...

 

[Béarn.com]

Oui j'ai déjà un fichier avec une combobox qui fonctionne trés bien.
Mais je ne comprend pas la fonction du "MAX"...

 

[Béarn.com]

En faite le "max" correspond au nombre 3 dans l'exemple précédent si j'ai bien compris, mais comment l'écrire sous vba ??

 

[vgendron]

bon bah. puisque visiblement tu n'as pas saisi ce qui était necessaire pour obtenir une réponse , je vais juste te faire une réponse en algorithme.. à toi de te débrouiller pour traduire en VBA --> touche magique F1, google etc etc

Début
déterminer la zone qui contient déjà des données en colonne A
à partir de la fin de cette zone en remontant vers le haut
chercher la première cellule qui contient le texte du combobox
en extraire la valeur (qui correspond donc au max)

à la fin de la zone
ajouter le texte du combobox + max+1
fin