Erreur d'exécution '5' vba excel
flo
-
flo -
flo -
Bonjour,
quand je lance le débogage de mon programme il affiche erreur d'exécution '5': argument ou appel de procédure incorrect.
Voici la partie de programme qui bug :
' supprimer le menu
Sub Suppr_Menu()
nombarre = "Worksheet menu bar"
Set NewMenu = Application.CommandBars(nombarre).Controls(nommenu)
NewMenu.Delete
End Sub
Pouvez-vous m'aider?
Merci d'avabce
quand je lance le débogage de mon programme il affiche erreur d'exécution '5': argument ou appel de procédure incorrect.
Voici la partie de programme qui bug :
' supprimer le menu
Sub Suppr_Menu()
nombarre = "Worksheet menu bar"
Set NewMenu = Application.CommandBars(nombarre).Controls(nommenu)
NewMenu.Delete
End Sub
Pouvez-vous m'aider?
Merci d'avabce
2 réponses
Bonjour,
pour supprimer une barre de menu personnelle....
Application.CommandBars(tonNomDeMenu).Delete
pourquoi faire compliquer?
nombarre = "Worksheet menu bar" ' le nom est peut être parlant pour toi
mais trompeur
Set NewMenu = Application.CommandBars(nombarre).Controls(nommenu)
sur la deuxième ligne ...nommenu n'est pas défini sauf si c'est global et que vient faire 'Controls' ???
Bonne journée.
pour supprimer une barre de menu personnelle....
Application.CommandBars(tonNomDeMenu).Delete
pourquoi faire compliquer?
nombarre = "Worksheet menu bar" ' le nom est peut être parlant pour toi
mais trompeur
Set NewMenu = Application.CommandBars(nombarre).Controls(nommenu)
sur la deuxième ligne ...nommenu n'est pas défini sauf si c'est global et que vient faire 'Controls' ???
Bonne journée.
