VBA - Workbook_Open()

[butterfly88]

Bonjour,

Je voudrais savoir comment faire lorsque j'ouvre mon classeur il se mette en plein écran et sans :

• Barre de formule
• En Tête de ligne et de commande
• Barre de défilement horizontal
• Onglets de classeur

Pour l'instant j'ai ça :

Private Sub Workbook_Open()
    Sheets("Form.DAe").Select
    Range("A1").Select
    Application.DisplayFullScreen = True
    ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:=True
End Sub

Merci d'avance !