Toujours ouvrir un fichier en plein ecran

[Eric]

Salut à tous,

Je voudrais savoir comment faire pour que mon fichier Excel s'ouvre toujours en plein écran ?
Même sur un PC different du miens ...

Merci d'avance pour vos réponse

 

[JC de Lorient]

bonsoir tout le monde
essaye avec ce code :

Application.WindowState=xlMaximized

 

[Luc72]

bonsoir eric
dans this woobook tape ceci

Private Sub Workbook_Open()
Application.DisplayFullScreen = True
End Sub

 

[Luc72]

bonsoir jc

on as evitée la colision

 

[Luc72]

re
et si tu ne veut pas voir les onglets

Private Sub Workbook_Open()
Application.DisplayFullScreen = True
ActiveWindow.DisplayWorkbookTabs = False
End Sub

 

[Eric]

Merci à vous pour ces reponses ultra rapide ...

 

[plumazon]

bonsoir,

j'ai utiliser cette macro mais comment revenir a l'etat normal??


Merci

 

[Dan]

Bonsoir,

Hum oui on ne l'a pas dit mais à la sortie de ton fichier tu dois absolument placer cette macro :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
End Sub

ou mieux faire ceci :

ouverture:

Private Sub Workbook_Open()
With application
   .ScreenUpdating = False
   .DisplayFullScreen = True
End with
End Sub

Fermeture :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
With application
   .DisplayFullScreen = False
   .ScreenUpdating = True
End with
End Sub

Toutes deux à placer en VBA dans THISWORKBOOK

Si pb n'hésite pas



Message édité par: Dan, à: 17/05/2006 23:55

 

[plumazon]

....Merci