Lancement macro dans menu

*** Copie du post par fbsoftware ****

Je suis en cours de test de ZWCAD 2018. En VBA je crée un menu pour le lancement d'une macro, mais celle-ci ne se lance pas lorsque l'on clique sur le menu.

Macro :

If ThisDrawing.Application.MenuGroups.Count > 0 Then 
    Set currMenuGroup = ThisDrawing.Application.MenuGroups.Item(0) 
    
    Créer le nouveau menu 
    Set newMenu = currMenuGroup.Menus.Add("Millenium") 
    
    Ajouter les commandes dans le nouveau menu 
        
    openMacro = Chr(3) & Chr(3) & "-execvba EpureCAO" & Chr(32) 
    Set newMenuItem = newMenu.AddMenuItem(newMenu.Count + 1, "Epure Plan CAO", openMacro) 
        

    Affiche le nouveau menu dans la toolbar 
    newMenu.InsertInMenuBar (ThisDrawing.Application.MenuBar.Count + 1) 
          
End If

Dans le menu ZWCAD, la macro apparaît bien.

Au clic sur le menu, -execvba est bien lancé mais me demande de saisir le nom de la macro ?

Si quelqu'un a une idée.

Merci,