J'ai créé un nouveau menu à l'ouverture d'un classeur à l'aide d'une macro
et je ne sais pas le détruire lorsque je ferme le classeur.
Pourriez vous m'aider ?
Merci d'avance
José
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
claudy
Bjour... va faire un tour de ce côté...
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Ta procédure pour fermer ton nouveau menu
End Sub A+ Claudy
"José" a écrit dans le message de news: 415547f5$0$13143$
Bonjour à tous,
J'ai créé un nouveau menu à l'ouverture d'un classeur à l'aide d'une macro et je ne sais pas le détruire lorsque je ferme le classeur. Pourriez vous m'aider ? Merci d'avance José
Bjour...
va faire un tour de ce côté...
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Ta procédure pour fermer ton nouveau menu
End Sub
A+
Claudy
"José" <perez.jose@free.fr> a écrit dans le message de news:
415547f5$0$13143$636a15ce@news.free.fr...
Bonjour à tous,
J'ai créé un nouveau menu à l'ouverture d'un classeur à l'aide d'une macro
et je ne sais pas le détruire lorsque je ferme le classeur.
Pourriez vous m'aider ?
Merci d'avance
José
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Ta procédure pour fermer ton nouveau menu
End Sub A+ Claudy
"José" a écrit dans le message de news: 415547f5$0$13143$
Bonjour à tous,
J'ai créé un nouveau menu à l'ouverture d'un classeur à l'aide d'une macro et je ne sais pas le détruire lorsque je ferme le classeur. Pourriez vous m'aider ? Merci d'avance José
AV
J'ai créé un nouveau menu à l'ouverture d'un classeur à l'aide d'une macro et je ne sais pas le détruire lorsque je ferme le classeur.
Private Sub Workbook_BeforeClose(Cancel As Boolean) On Error Resume Next MenuBars(xlWorksheet).Menus("MonMenu").Delete End Sub
AV
J'ai créé un nouveau menu à l'ouverture d'un classeur à l'aide d'une macro
et je ne sais pas le détruire lorsque je ferme le classeur.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
MenuBars(xlWorksheet).Menus("MonMenu").Delete
End Sub