XL 2016 Création de boutons en boucle

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

jul64600

XLDnaute Nouveau
Bonjour
1. Merci pour l'aide que vous m'apporterez car ce fichier est décisif pour moi au niveau pro...

j'ai un fichier avec un grand nombre de ligne.
Je souhaiterai créer un bouton avec une macro que écrirait "1" dans la cellule choisi dans la ligne.
enfin je souhaiterais multiplier ce bouton autant de fois que j'ai de ligne.

Plus concrètement :
En colonne A = N° de commande.
En colonne B = prêt à expédier ?

Pour la ligne 1 si je clique sur le bouton_1, la macro écrit "1" en B1
Pour la ligne 2 si je clique sur le bouton_2, la macro écrit "1" en B2

ainsi de suite….

Comment créer autant de bouton que j'ai de ligne ?
Comment affecter une macro qui mettra le "1" dans la colonne B de la ligne correspondante ?
 
Bonjour Jul, et bienvenu sur XLD,
Je pense que la duplication de boutons n'est pas une bonne chose.
Il est peut être plus simple d'agir quand on clic sur une cellule.E n PJ quand on clique dans une cellule de la colonne B on met un 1 si A est non vide.
A mettre dans la feuille concernée :
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo Fin
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, [B:B]) Is Nothing Then
        If Cells(Target.Row, "A") <> "" Then Target = 1
    End If
Fin:
End Sub
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
21
Affichages
852
Réponses
6
Affichages
467
  • Question Question
Microsoft 365 Bug sur une macro
Réponses
6
Affichages
268
Retour