Discussion :

[jean30]

Bonjour
Ces lignes de code me cause une erreur d'exécution 424 Objet requis
Je vous remercie de bien vouloir me corriger

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Workbook_Open()
    Btn_ValiderSaisie.Visible = True
    Btn_MajBase.Visible = False
    Btn_Traite.Visible = False
End Sub

[jean30]

Avec ce code ça fonctionne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Workbook_Open()
    Sheets("FR").Btn_ValiderSaisie.Visible = True
    Sheets("FR").Btn_MajBase.Visible = False
    Sheets("FR").Btn_Traite.Visible = False
End Sub