OVH Cloud OVH Cloud

Plein écran avec onglets

3 réponses
Avatar
garnote
Bonjour, Bonjour,

Comment obtenir, à l'ouverture d'un classeur,
un plein écran avec la barre de formules
et les onglets affichés ?
Cette macro «fait plein écran», affiche la
barre de formules mais ne veut rien savoir
d'afficher les onglets :

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

Où est le vice ?


Serge

3 réponses

Avatar
jp
salut,
essai avec cette ligne de commande
ActiveWindow.DisplayWorkbookTabs = True

c'est le probleme du plein ecran .

une soluce est d'installer des boutons pour aller vers les
differentes feuille

a+

jp
-----Message d'origine-----
Bonjour, Bonjour,

Comment obtenir, à l'ouverture d'un classeur,
un plein écran avec la barre de formules
et les onglets affichés ?
Cette macro «fait plein écran», affiche la
barre de formules mais ne veut rien savoir
d'afficher les onglets :

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

Où est le vice ?


Serge


.



Avatar
ChrisV
Bonjour Serge,

Non testée...

Private Sub Workbook_Open()
With Application
.DisplayFullScreen = True
.DisplayFormulaBar = True
.DisplayStatusBar = True
End With
End Sub


ChrisV


"garnote" a écrit dans le message de news:
TKNTb.13441$
Bonjour, Bonjour,

Comment obtenir, à l'ouverture d'un classeur,
un plein écran avec la barre de formules
et les onglets affichés ?
Cette macro «fait plein écran», affiche la
barre de formules mais ne veut rien savoir
d'afficher les onglets :

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

Où est le vice ?


Serge




Avatar
Ellimac
Bonjour Serge,

Ton code fonctionne chez moi !!!

Camille

-----Message d'origine-----
Bonjour, Bonjour,

Comment obtenir, à l'ouverture d'un classeur,
un plein écran avec la barre de formules
et les onglets affichés ?
Cette macro «fait plein écran», affiche la
barre de formules mais ne veut rien savoir
d'afficher les onglets :

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

Où est le vice ?


Serge


.