Bonjour à tous,
J'ouvre un fichier Excel à partir d'une présentation Powerpoint (Grace à un lien hypertext).
Sur mon fichier excel, j'ai mis une macro pour ouvrir la feuille en plein écran. Malgré cette macro, la barre d'outil web s'affiche!
Y a t il moyen de supprimer cette barre ?
Ci dessous le code pour passer en mode plein écran (Dans le Worksheet)
Sub PleinEcran()
Application.ScreenUpdating = False
With Application
.CommandBars(1).Enabled = False
.DisplayFullScreen = True
End With
With ActiveWindow
.DisplayHeadings = False
.DisplayOutline = False
.DisplayWorkbookTabs = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
End With
Application.ScreenUpdating = True
End Sub
Merci d'avance
J'ouvre un fichier Excel à partir d'une présentation Powerpoint (Grace à un lien hypertext).
Sur mon fichier excel, j'ai mis une macro pour ouvrir la feuille en plein écran. Malgré cette macro, la barre d'outil web s'affiche!
Y a t il moyen de supprimer cette barre ?
Ci dessous le code pour passer en mode plein écran (Dans le Worksheet)
Sub PleinEcran()
Application.ScreenUpdating = False
With Application
.CommandBars(1).Enabled = False
.DisplayFullScreen = True
End With
With ActiveWindow
.DisplayHeadings = False
.DisplayOutline = False
.DisplayWorkbookTabs = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
End With
Application.ScreenUpdating = True
End Sub
Merci d'avance