F
Fabrizio
Guest
Bonjour tout d'abord merci à tous les gens qui font vivre ce site,... Ensuite comme vous pouvez vous en douter mon problème :
j'ai mis ce code dans ThisWorkbook afin de faire disparaitre des boutons à l'ouverture du fichier
Private Sub Workbook_Open()
'je vais sur la feuille Impression
Sheets('Impressions').Select
'Je deprotege ma feuille
ActiveSheet.Protect DrawingObjects:=False, Contents:=False, Scenarios:=False
'j'essaye de faire disparaitre mon bouton
CommandButton1.Visible = False
'je reprotège ma feuille
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
ce code 'plante' sur le du bouton ligne
CommandButton1.Visible = False
En gros il me dit 'run time error '424' Object Required
(le bouton existe bien ) et il est apparent
Est-ce que quelqu'un pourait me dire ou se situe mon erreur ?
D'avance Merci
Fabrizio
j'ai mis ce code dans ThisWorkbook afin de faire disparaitre des boutons à l'ouverture du fichier
Private Sub Workbook_Open()
'je vais sur la feuille Impression
Sheets('Impressions').Select
'Je deprotege ma feuille
ActiveSheet.Protect DrawingObjects:=False, Contents:=False, Scenarios:=False
'j'essaye de faire disparaitre mon bouton
CommandButton1.Visible = False
'je reprotège ma feuille
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
ce code 'plante' sur le du bouton ligne
CommandButton1.Visible = False
En gros il me dit 'run time error '424' Object Required
(le bouton existe bien ) et il est apparent
Est-ce que quelqu'un pourait me dire ou se situe mon erreur ?
D'avance Merci
Fabrizio