Excel en total Full Screen

Salut...

Je cherche à faire tourner en fullscreen une petite application que j'ai developpé sur Excel en VBA.

Le problème c'est que dans le Workbook_Open et BeforeClose, j'ai mis le code suivant:

Application.DisplayAlerts = False
Application.DisplayFullScreen = False
ActiveWindow.DisplayVerticalScrollBar = True

Application.CommandBars("Standard").Enabled = True
Application.CommandBars("Formatting").Enabled = True
Application.CommandBars("Stop Recording").Enabled = True
Application.CommandBars("Control Toolbox").Enabled = True
Application.CommandBars("Drawing").Enabled = True
Application.CommandBars("External Data").Enabled = True
Application.CommandBars("Forms").Enabled = True
Application.CommandBars("Chart").Enabled = True
Application.CommandBars("Picture").Enabled = True
Application.CommandBars("Reviewing").Enabled = True
Application.CommandBars("PivotTable").Enabled = True
Application.CommandBars("Visual Basic").Enabled = True
Application.CommandBars("Web").Enabled = True
Application.CommandBars("WordArt").Enabled = True
Application.CommandBars("Client Access").Enabled = True

ActiveWorkbook.Close
Application.DisplayAlerts = True

et respectivement le contraire à l'ouverture...

code créer via une macro (on ne peut pas plus juste pour la syntaxe) et bien ça foire...

Quelqu'un connaît-il un code STANDARD que je puisse insérer dans mon applic pour la faire tourner en full Screen... ????

merci de vos éclairages...