Bouton VBA pour incrémentation

Bonjour à tous,

Je rencontre actuellement un problème avec le contrôle de formulaire sur Excel 2010. En fait je veux remplir des cellules à l'aide de boutons pour simplifier une manipulation. Je m'explique. J'ai 5 "boutons", qui sont: 0% - 40% - 60% - 80% - 100% dès que je clique sur celui ci, la case voulue se remplie avec le chiffre. Sauf que je neux pas réitérer tout ces boutons pour toutes les lignes ! Je veux garder ces 5 boutons pour remplir toute ma feuille. Sachant qu'il faut à chaque fois descendre simplement d'une ligne, avez vous une idée de comment écrire ce code ?

Voici mon code pour le moment

Sub AA()

'

' AA Macro

'

'

Range("J12").Value = "0%"

Range("J13").Select

End Sub

Je vous remercie d'avance !

Bonjour,

voici la macro pour 0%

Sub AA()

'

' AA Macro

'

'

selection.Value = "0%"

selection.offset(1,0).select

End Sub

Merci de votre réponse, mais quand j'utilise votre code j'ai 0% dans le deux cellules. Idéalement il faut seulement que le 0% s'ajoute dans la 2e cellule lors du clique.

Par exemple avec mes 5 boutons à cliquez il faudrait pouvoir remplir ces 3 lignes:

0%

40%

100%

Bonjour,

Tu dois ne sélectionner qu'une cellule si tu veux que la valeur ne se mette que dans une cellule.

si tu sélectionnes 2 cellules la valeur sera mise dans les 2 cellules;