Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Philippe.R
Le #5054791
Bonsoir Guy,

Comme ceci par exemple ?

http://www.excelabo.net/excel/barresoutils.php#lapasla
--
http://www.excelabo.net/mpfe/connexion.php
http://dj.joss.free.fr/trombine.htm
Avec plaisir
Philippe.R
"Guy72" news:
Bonjour
Que faut il faire pour faire apparaître ma barre de menus ?
Cordialement
Guy



Guy72
Le #5054641
Bonjour Philippe
C'est justement à cause de la copie de ce code que j'ai perdu ma barre de
menu.
Cordialement
Guy

"Philippe.R"
Bonsoir Guy,

Comme ceci par exemple ?

http://www.excelabo.net/excel/barresoutils.php#lapasla
--
http://www.excelabo.net/mpfe/connexion.php
http://dj.joss.free.fr/trombine.htm
Avec plaisir
Philippe.R
"Guy72" news:
Bonjour
Que faut il faire pour faire apparaître ma barre de menus ?
Cordialement
Guy






Philippe.R
Le #5048661
Bonsoir Guy,
Cette partie du code :

Dim Barre As Variant
For Each Barre In Barres
Application.CommandBars(Barre).Visible = True
Next Barre
Application.CommandBars("worksheet menu bar").Enabled = True

ne fonctionne pas ?

Je te propose alors d'essayer celui ci, publié naguère par Modeste :

Sub Sesame()
Dim cmdB As CommandBar
i = 1
For Each cmdB In Application.CommandBars
cmdB.Enabled = True
If i < 5 Then cmdB.Visible = True
i = i + 1
Next cmdB
With Application
.DisplayFullScreen = False
.DisplayStatusBar = True
.DisplayFormulaBar = True
End With

For Each WS In ActiveWorkbook.Worksheets
WS.Visible = True
WS.Activate
WS.Cells.EntireColumn.Hidden = False
WS.Cells.EntireRow.Hidden = False
WS.[A1].Select
With ActiveWindow
.DisplayWorkbookTabs = True
.DisplayHeadings = True
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayGridlines = True
.FreezePanes = False
End With
Next
ActiveWorkbook.Worksheets(1).Select
End Sub
--
http://www.excelabo.net/mpfe/connexion.php
http://dj.joss.free.fr/trombine.htm
Avec plaisir
Philippe.R
"Guy72" news:
Bonjour Philippe
C'est justement à cause de la copie de ce code que j'ai perdu ma barre de
menu.
Cordialement
Guy

"Philippe.R"
Bonsoir Guy,

Comme ceci par exemple ?

http://www.excelabo.net/excel/barresoutils.php#lapasla
--
http://www.excelabo.net/mpfe/connexion.php
http://dj.joss.free.fr/trombine.htm
Avec plaisir
Philippe.R
"Guy72" news:
Bonjour
Que faut il faire pour faire apparaître ma barre de menus ?
Cordialement
Guy










Publicité
Poster une réponse
Anonyme