VBA masquer ruban et menu Excel

Bonjour,

Je voudrais savoir si l'un d'entre vous connais un code pour masquer le ruban et le menu d'excel, pour une question d'esthetique mais aussi de sécurité. Merci

Cordialement

Romain

Bonsoir à tous,

Dans le ThisWorkbook

Private Sub Workbook_WindowActivate(ByVal Wn As Window)
    '--- active ce classeur, met en plein écran ---
    Application.DisplayFullScreen = True
End Sub

Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
    '--- change de classeur, annule plein écran ---
    Application.DisplayFullScreen = False
End Sub

Amicalement

Claude

Merci Claude, une fois de plus tu m'apportes tes connaissances! merci

Bonjour,

Les 2 codes précédents sont valables s'il y a plusieurs classeurs ouverts,

et permettent de n'affecter que celui où est la macro.

Maintenant, si tu n'ouvre que ce classeur, il faut ajouter ce code (pour l'ouverture)

Private Sub Workbook_Open()
    '--- ouverture classeur, met en plein écran ---
    Application.DisplayFullScreen = True
End Sub

le "Private Sub Workbook_BeforeClose(Cancel As Boolean)"

ne semble pas utile, je découvre en même temps que toi !

Amicalement

Claude

Ok, j'ai fait la modif !