Incrémenter cellule par combobox

Béarn.com

XLDnaute Nouveau
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

XLDnaute Barbatruc
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...
 

vgendron

XLDnaute Barbatruc
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
 
Haut Bas