Supprimer Barre outils Web

[fanic]

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

 

[nat54]

Re : Supprimer Barre outils Web

Bonjour,

J'ai juste fait avec l'enregistreur de macro donc je ne garantis rien...

Application.CommandBars("Web").Visible = False

 

[fanic]

Re : Supprimer Barre outils Web

Ca fonctionne tres bien.
J'ai placé la ligne dans workbook sur activate.

Merci