Bonjour,
Pourriez vous m'expliquer comment tester la présence d'un menu dans une
application, pour éviter de le créer plusieurs fois ( c'est le cas si je
relance ma macro sans l'avoir quittée) .
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
Philippe.R
Bonjour José,
Le plus simple, AMHA, avec les menus personnalisés est de les créer à la volée en commençant par les détruire et en gérant l'erreur éventuellement générée avec un simple "on error resume next". -- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002
"José" a écrit dans le message de news:401cca41$0$11230$
Bonjour, Pourriez vous m'expliquer comment tester la présence d'un menu dans une application, pour éviter de le créer plusieurs fois ( c'est le cas si je relance ma macro sans l'avoir quittée) .
Merci José
Bonjour José,
Le plus simple, AMHA, avec les menus personnalisés est de les créer à la volée en commençant par les
détruire et en gérant l'erreur éventuellement générée avec un simple "on error resume next".
--
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
"José" <perez.jose@free.fr> a écrit dans le message de news:401cca41$0$11230$626a54ce@news.free.fr...
Bonjour,
Pourriez vous m'expliquer comment tester la présence d'un menu dans une
application, pour éviter de le créer plusieurs fois ( c'est le cas si je
relance ma macro sans l'avoir quittée) .
Le plus simple, AMHA, avec les menus personnalisés est de les créer à la volée en commençant par les détruire et en gérant l'erreur éventuellement générée avec un simple "on error resume next". -- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002
"José" a écrit dans le message de news:401cca41$0$11230$
Bonjour, Pourriez vous m'expliquer comment tester la présence d'un menu dans une application, pour éviter de le créer plusieurs fois ( c'est le cas si je relance ma macro sans l'avoir quittée) .
Merci José
ru-th
Salut
un exemple Teste l'existence de "mon menu" dans la barre de menu Sub test() On Error Resume Next Set rep = Application.CommandBars("Worksheet Menu Bar").Controls("Mon Menu") If Err = 0 Then MsgBox "Le menu existe" Else MsgBox "le menu n'existe pas" Err = 0 End If End Sub
-- a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"José" a écrit dans le message de news:401cca41$0$11230$
Bonjour, Pourriez vous m'expliquer comment tester la présence d'un menu dans une application, pour éviter de le créer plusieurs fois ( c'est le cas si je relance ma macro sans l'avoir quittée) .
Merci José
Salut
un exemple
Teste l'existence de "mon menu" dans la barre de menu
Sub test()
On Error Resume Next
Set rep = Application.CommandBars("Worksheet Menu Bar").Controls("Mon Menu")
If Err = 0 Then
MsgBox "Le menu existe"
Else
MsgBox "le menu n'existe pas"
Err = 0
End If
End Sub
--
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"José" <perez.jose@free.fr> a écrit dans le message de
news:401cca41$0$11230$626a54ce@news.free.fr...
Bonjour,
Pourriez vous m'expliquer comment tester la présence d'un menu dans une
application, pour éviter de le créer plusieurs fois ( c'est le cas si je
relance ma macro sans l'avoir quittée) .
un exemple Teste l'existence de "mon menu" dans la barre de menu Sub test() On Error Resume Next Set rep = Application.CommandBars("Worksheet Menu Bar").Controls("Mon Menu") If Err = 0 Then MsgBox "Le menu existe" Else MsgBox "le menu n'existe pas" Err = 0 End If End Sub
-- a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"José" a écrit dans le message de news:401cca41$0$11230$
Bonjour, Pourriez vous m'expliquer comment tester la présence d'un menu dans une application, pour éviter de le créer plusieurs fois ( c'est le cas si je relance ma macro sans l'avoir quittée) .
