DisplayFullScreen

G

GG

Guest

• 20 Mai 2006

• #2

Salut le forum
Teste ceci
Sub Barres_Outils()
Application.ScreenUpdating = False
Toolbars(1).Visible = True
Toolbars(2).Visible = True
With ActiveWindow
.DisplayWorkbookTabs = True
End With
Application.DisplayFormulaBar = True
Application.ScreenUpdating = True
End Sub
A+

 

Vote positif 0 Vote négatif

G

GG

Guest

• 20 Mai 2006

• #3

Cedric
Supprime
Toolbars(1).Visible = True
Toolbars(2).Visible = True
c'est une application personnelle!!

 

Vote positif 0 Vote négatif

C

Cedric

Guest

• 20 Mai 2006

• #4

Bonjour GG,

Dans ton code tu n'utilise pas :

Application.DisplayFullScreen = True

Moi j'ai cette fonction et plus d'onglets, comment faire pour les avoir.
Merci pour ton aide.
Cedric

 

Vote positif 0 Vote négatif

G

GG

Guest

• 20 Mai 2006

• #5

Cedric
Tout depands de ta configuration en fait
tu veux ajouter la barre d'onglet
donc il faut ajouter à ton code :
.DisplayWorkbookTabs = True

Pour le reste
Application.DisplayFormulaBar = False
Toolbars(1).Visible = False
Toobars(2).Visible = False
.........................
c'est à toi de voir ce que tu veux valider ou pas.
Utilise l'enregistreur de macro tu verras la syntaxe.
Salut

 

Vote positif 0 Vote négatif

C

Cedric

Guest

• 20 Mai 2006

• #6

Re,

En fait, je n'avais pas vu, elle est cachée par la barre en bas où il y a 'Démarer' etc
que faire il n'y a pas un moyen en VBA de la remonter cette barre.

Cedric

 

Vote positif 0 Vote négatif