Rendre invisible un bouton sur une feuille Excel

[Tatan]

Bonjour à tous,
Tout d"abord je vous souhaite de bonne fête de fin d"année.
J'aurai besoin de votre aide, je réalise un fichier afin de gérer du stock.
J'aimerai qu'à l'ouverture de mon fichier les boutons "Rentrer Stock" et ""Commande" se trouvant sur la feuille "Stock" soit invisible.
J'ai pu voir sur différent poste que pouvez lancer des macro automatiques avec ce code en le plaçant dans "ThisWorbook"

Private Sub Workbook_Open()
....
End Sub

Mais je n'ai pas trouvé comment rendre invisible mes boutons.

Je vous remercie d'avance

Jonathan

 

[pierrejean]

Re : Rendre invisible un bouton sur une feuille Excel

Bonjour Tatan

teste:

Private Sub Workbook_Open()
'J'aimerai rendre les boutons "rentrer consommables" et "Commande" invisible à l'ouverture du fichier
Sheets("Stock").Buttons("Bouton2").Visible = False
Sheets("Stock").Buttons("Button 3").Visible = False
End Sub

 

[Staple1600]

Re : Rendre invisible un bouton sur une feuille Excel

Bonjour


Soit F1 puis enregistreur de macros
Soit enregistreur de macros puis F1

Dans les deux cas il te faut la caresser.

EDITION: Bonjour PierreJean


EDITION BIS
Tatan, si c'est pour pour poser ce type de question*, autant ne rien poser ...


*: question dont la réponse se trouve dans l'aide de VBA (ALT+F11 puis touche F1)

(Clique sur la miniature pour voir la copie d'écran en taille réelle.

 

[Tatan]

Re : Rendre invisible un bouton sur une feuille Excel

Bonjour Tatan

teste:

Private Sub Workbook_Open()
'J'aimerai rendre les boutons "rentrer consommables" et "Commande" invisible à l'ouverture du fichier
Sheets("Stock").Buttons("Bouton2").Visible = False
Sheets("Stock").Buttons("Button 3").Visible = False
End Sub

Merci PierreJean, je viens de tester, c'est exactement ce que je voulais.
Je te remercie

 

[Tatan]

Re : Rendre invisible un bouton sur une feuille Excel

Bonjour


Soit F1 puis enregistreur de macros
Soit enregistreur de macros puis F1

Dans les deux cas il te faut la caresser.

EDITION: Bonjour PierreJean
Trop tard pour la caresse désormais

Staple1600 pour me dire ça autant rien dire .....