les barres d'outils et d'etat ne sont plus actives

kabbour

XLDnaute Nouveau
lorsque je click sur fichier le menu rien n'apparait pas
et merci d'avance (veuillez m'excuser car ca m'a causer un grand probleme)
 
Dernière édition:

GIBE59

XLDnaute Nouveau
Re : les barres d'outils et d'etat ne sont plus actives

Bonjour.

Même si tu n'es pas poli, essaie ces lignes de codes :

Sub ResetCommandBars()
Dim x
On Error Resume Next
For x = 1 To Application.CommandBars.Count
With Application.CommandBars(x)
.Reset
.Enabled = True
End With
Next x
End Sub
 

Discussions similaires