Discussion :

[alorse]

Bonjour

j'aimerais savoir comment obtenir des boutons sur une ligne donnée ? Car jai par exemple la ligne 7 et je voudrais supprimer tous les boutons de la ligne 7

Merci

[ouskel'n'or]

Je suppose que sur la ligne 7 tu as les boutons PremierBouton = 3ème bouton de ta feuille, au bouton DernierBouton = 7ème bouton de ta feuille, les boutons 1 et 2 étant sur une autre ligne par exemple, ainsi que les boutons 8 à 12

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub AlignerDesBoutons()
Dim NoBouton As Byte, DernierBouton As Byte, PremierBouton As Byte
    DernierBouton = 7
    PremierBouton = 3
    For NoBouton = PremierBouton To DernierBouton
           ActiveSheet.Shapes(NoBouton).Top = Rows(7).Top        
    Next
End Sub

A+

[alorse]

Ok, merci beaucoup

[ouskel'n'or]

Un petit Résolu si c'est résolu Bouton en bas de la fenêtre