Bug de disparition avec un Commandbutton via vba
Résolu
Anonyme
-
Bobbyli Messages postés 220 Date d'inscription Statut Membre Dernière intervention -
Bobbyli Messages postés 220 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Avant toute chose, je tiens à préciser que je suis totalement un néophyte en VBA. J'ai seulement des bases (ce n'est pas ma formation...)
Cela étant dit, je fais appel à vous pour un "léger" soucis (j'interagis avec excel):
Mon objectif: créer un bouton (commandbutton), associé évidemment à une macro, qui une fois activé, deviens invisible.
Dans l'idée j'ai compris l'écriture:
Activesheet.shapes("nombouton").visible = true.
Ok. Mais le problème réside ailleurs... En effet, quand je clique sur le bouton, celui ne disparaît pas totalement. Je dois mettre les cases où se trouvent le bouton en surbrillance pour qu'elle disparaisse totalement.
Par ailleurs, quand j'active la macro via vba, aucun soucis...
Où réside le soucis?
Merci d'avance!
Avant toute chose, je tiens à préciser que je suis totalement un néophyte en VBA. J'ai seulement des bases (ce n'est pas ma formation...)
Cela étant dit, je fais appel à vous pour un "léger" soucis (j'interagis avec excel):
Mon objectif: créer un bouton (commandbutton), associé évidemment à une macro, qui une fois activé, deviens invisible.
Dans l'idée j'ai compris l'écriture:
Activesheet.shapes("nombouton").visible = true.
Ok. Mais le problème réside ailleurs... En effet, quand je clique sur le bouton, celui ne disparaît pas totalement. Je dois mettre les cases où se trouvent le bouton en surbrillance pour qu'elle disparaisse totalement.
Par ailleurs, quand j'active la macro via vba, aucun soucis...
Où réside le soucis?
Merci d'avance!
A voir également:
- Bug de disparition avec un Commandbutton via vba
- Bug chromecast - Guide
- Bug localisation snap ✓ - Forum Snapchat
- Partager des photos via un lien - Guide
- Iptv bug forum ✓ - Forum Box et Streaming vidéo
- L'indice n'appartient pas à la sélection vba - Forum VB / VBA
6 réponses
Hello,
Le bouton ne disparait pas totalement ? C'est peut-être parce qu'il était sélectionné et que la petit surbrillance de sélection persiste ; elle disparait quand tu sélectionnes un autre élément.
Non ?
Le bouton ne disparait pas totalement ? C'est peut-être parce qu'il était sélectionné et que la petit surbrillance de sélection persiste ; elle disparait quand tu sélectionnes un autre élément.
Non ?
Pour e^tre tout à fait clair:
Le bouton selectionne toutes les cellules et les met en noire.
Puis il doit disparaître
Et si je laisse toute les cells selectionnées j'ai pas de soucis mais si je fais selectionner/activer une autre cellule/plage... Ca bug.
Et encore une fois, via vba tout court, aucun soucis
Le bouton selectionne toutes les cellules et les met en noire.
Puis il doit disparaître
Et si je laisse toute les cells selectionnées j'ai pas de soucis mais si je fais selectionner/activer une autre cellule/plage... Ca bug.
Et encore une fois, via vba tout court, aucun soucis
Bonjour,
Les boutons issu des outils formulaire ne supporte pas cette propriété.
De plus pour "cacher" un bouton c'est = False
Met un bouton des outils ActiveX tu va alors avoir l'événement Clic
A+
Les boutons issu des outils formulaire ne supporte pas cette propriété.
De plus pour "cacher" un bouton c'est = False
Met un bouton des outils ActiveX tu va alors avoir l'événement Clic
Private Sub CommandButton1_Click()
'... le nom de la macro
CommandButton1.Visible = False
End Sub
A+
Bonjour!
Autant pour moi, j'ai bien mis = false! Et avec un bouton des outisl activeX. Voici la procédure en question:
Private Sub Debut_Click()
'colorie
Cells.Select
Selection.Interior.ColorIndex = 1
Range("A1").Select
'masque le bouton start
ActiveSheet.Shapes("Debut").Visible = False
ActiveSheet.Shapes("Annulation").Visible = True
Range("A1").Select
End Sub
Là, je viens de tester avec "Debut.visible=false" au lieu de "activesheet.shapes......" et ça m'a l'air de fonctionner correctement, sans que je sois néanmoins en mesure de me l'expliquer...
Autant pour moi, j'ai bien mis = false! Et avec un bouton des outisl activeX. Voici la procédure en question:
Private Sub Debut_Click()
'colorie
Cells.Select
Selection.Interior.ColorIndex = 1
Range("A1").Select
'masque le bouton start
ActiveSheet.Shapes("Debut").Visible = False
ActiveSheet.Shapes("Annulation").Visible = True
Range("A1").Select
End Sub
Là, je viens de tester avec "Debut.visible=false" au lieu de "activesheet.shapes......" et ça m'a l'air de fonctionner correctement, sans que je sois néanmoins en mesure de me l'expliquer...
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question