suppression bouton par macro

A

Amydale

Guest

• 18 Mai 2006

• #2

Effectivement, toutes les shapes se suppriment tres facilement avec
ActiveSheet.Shapes('MonBouton').Delete

Mais pas les objets vb (Barre outils/Boite de contrôles, je pense que tu as inversé les 2).
Je pense qu'on ne peut pas car nous ne sommes pas en mode création.

Cependant, une bidouille en attendant (pas terrible du tout), tu peux toujours masquer le bouton
Activesheet.Commandbutton1.visible=false
Mais inconvénient, si on passe en mode édition, pouf il réapparait 😱)

J'vais jeter un coup d'oeil, ca m'interesse

 

Vote positif 0 Vote négatif

A

Amydale

Guest

• 18 Mai 2006

• #3

Effectivement, toutes les shapes se suppriment tres facilement avec
ActiveSheet.Shapes('MonBouton').Delete

Mais pas les objets vb (Barre outils/Boite de contrôles, je pense que tu as inversé les 2).
Je pense qu'on ne peut pas car nous ne sommes pas en mode création.

Cependant, une bidouille en attendant (pas terrible du tout), tu peux toujours masquer le bouton
Activesheet.Commandbutton1.visible=false
Mais inconvénient, si on passe en mode édition, pouf il réapparait 😱)

J'vais jeter un coup d'oeil, ca m'interesse

 

Vote positif 0 Vote négatif

A

Amydale

Guest

• 18 Mai 2006

• #4

oups petit bug. désolé

 

Vote positif 0 Vote négatif

B

Bernard91

Guest

• 18 Mai 2006

• #5

Le forum, Amydale,
J'ai réussi une manip

Activedheet.Shapes('Button 8').Select
Selection.Delete
ou
Activedheet.Shapes('ToggleButton1').Select
Selection.cut

J'avais peur que le numéro en l'occurrence 8, s'incrémente changeant ainsi le nom à chaque nouvelle feuille mais en fait non.

Merci

 

Vote positif 0 Vote négatif

B

Bernard91

Guest

• 18 Mai 2006

• #6

Le Forum,
Je me suis réjouis trop vite, pourt une raison que j'ignore, ma manip ne fonctionne plus.
Donc si vous avez une solution plus sûre, je suis preneur
Bonne soirée

 

Vote positif 0 Vote négatif