Sub Bouton1_Clic() .... instructions (c'est ce que je veux "voir") End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionBah quelles sont tes questions ?
Sub deletecoupe() 'suppression du dernier object dans la feuille1 Dim nombreshapes As Integer nombreshapes = Worksheets(1).OLEObjects.Count 'compte le nombre d'objects dans la feuille1 Worksheets(1).Activate 'Sélection de la feuille Worksheets(1).Shapes(nombreshapes).Delete 'on supprime le dernier End Sub
Mais il lui a été demandé entre autres :
- son code de création du bouton ===>> toujours pas là
- la macro (Sub Boutonx_Clic() , ou x suffixe du bouton, qui gère les instructions au clic>> toujours pas là !
Alors ... ===>> dialogue de sourds ...
Mon but est de trouvé une solution pour supprimer le bouton de ma commande après avoir cliquer dessus.
Le fait qu'il s'appel button2, button3 ou button4 est un problème par rapport à la macro que j'ai écrite.
Mais si je peux contourner le nom du bouton tant mieux.