Ouvertue en full screen désactive le num lock

Hello,

Je suis confronté à un petit problème bizarre.

Quand j'ouvre mon fichier, je souhaite qu'il s'ouvre en full screen sans le ruban et sans la barre de formule.

Ca fonctionne mais ça désactive le num lock du clavier. C'est agassant...

Je vous mets le fichier en pj.

Voici le code en question:

5test.xlsm (10.77 Ko)

Private Sub Workbook_Open()

With Application

If .CommandBars("Ribbon").Height > 100 Then SendKeys "^{F1}"

.DisplayFormulaBar = False

Application.DisplayFullScreen = True

End With

End Sub

Merci pour votre savoir.

Je n'ai pas le soucis mais ceci dit

essai en ajoutant :

SendKeys "{NUMLOCK}"

Sebyg a écrit :
Je n'ai pas le soucis mais ceci dit
essai en ajoutant :
SendKeys "{NUMLOCK}"

D'une simplicité déconcertante mais d'une efficacité sans pareil! Mille mercis!

C'est un plaisir si cela à fonctionné !!