Microsoft 365 Affichage à l'ouverture du classeur

[Jojo973]

Bonjour,
Je souhaiterai qu'à l'ouverture du classeur,
- Pas de ruban.
- Pas de référence ligne et colonne
- Une plage de cellules visible ou pas d'ascenseurs.

Merci d'avance

 

[job75]

Bonjour Jojo973,

Placez ce code dans ThisWorkbook :

Private Sub Workbook_Open()
Application.DisplayFullScreen = True
If Worksheets.Count Then
    Application.Goto Worksheets(1).[D10], True 'cadrage à adapter
    With ActiveWindow
        .DisplayHeadings = False
        .DisplayHorizontalScrollBar = False
        .DisplayVerticalScrollBar = False
    End With
End If
Me.Saved = True 'évite l'invite à la fermeture si aucune modification
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
End Sub

A+