Icône de la ressource

complement Xla d'export de code en html et pdf avec coloration syntaxique 2.4.1

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

patricktoulon

XLDnaute Barbatruc
patricktoulon a soumis une nouvelle ressource:

complement Xla d'export de code en html et pdf avec coloration syntaxique - du code en couleur dans vos partage de code en pdf

Bonjour à tous
avec ce complément vous allez pouvoir exporter et partager vos codes
encapsulé dans un pdf ou visionner en html avec la coloration synatxique
j'en parle un peu plus et vous montre comment l'utiliser dans cette video
Pour afficher ce contenu, nous aurons besoin de votre consentement pour définir des cookies tiers.
Pour plus d'informations, consultez notre page sur les cookies.

En savoir plus sur cette ressource...
 
Bonjour,
Je me suis permis de modifier votre macro dans le module _callback :
''''''procedure {getContent} de remplissage du DynamicMenu[ID:''dynamicMenu_2'' Label:''Liste Macro'']'dans le parent [group_2'' Label:''Export Sub et Fonctions'']
'''''Public Sub dynamicMenu_2_getContent(ctl As IRibbonControl, ByRef content)

Car si aucun classeur ouvert? la macro plantait :

ci dessous la nouvelle version que j'ai faite qui fonctionne très bien. Ca teste si un classeur est ouvert ou non :

' procédure {getContent} de remplissage du DynamicMenu[ID:'dynamicMenu_2' Label:'Liste Macro'] dans le parent [group_2' Label:'Export Sub et Fonctions']
Public Sub dynamicMenu_2_getContent(ctl As IRibbonControl, ByRef content)
Dim wb As Workbook
Dim VbComp As Object, VbComps As Object
Dim code As String, t As Variant, i As Long
Dim ok As Boolean, lasub As String, a As Long, cl As Long

' Test si classeur actif est un .xlsm avec accès autorisé
Set wb = ActiveWorkbook
If wb Is Nothing Then Exit Sub
If LCase(Right(wb.Name, 5)) <> ".xlsm" Then
MsgBox "Ce menu ne fonctionne que sur un classeur .xlsm", vbExclamation
Exit Sub
End If

On Error GoTo ErreurVBA
Set VbComps = wb.VBProject.VBComponents
On Error GoTo 0

content = "<menu xmlns=""http://schemas.microsoft.com/office/2006/01/customui"">" & vbCrLf

For Each VbComp In VbComps
cl = VbComp.CodeModule.CountOfLines
If cl > 0 Then
code = VbComp.CodeModule.Lines(1, cl)
If Trim(code) <> "" Then
a = a + 1
content = content & "<menu id=""" & VbComp.Name & a & """ label=""Module : " & VbComp.Name & """>" & vbCrLf
t = Split(code & vbCrLf, vbCrLf)
For i = 1 To UBound(t)
ok = False
Select Case True
Case Left(Trim(t(i)), 4) = "Sub "
ok = True
Case Left(Trim(t(i)), 11) = "Private Sub "
ok = True
Case Left(Trim(t(i)), 11) = "Public Sub "
ok = True
Case Left(Trim(t(i)), 9) = "Function "
ok = True
Case Left(Trim(t(i)), 17) = "Private Function "
ok = True
Case Left(Trim(t(i)), 16) = "Public Function "
ok = True
End Select
If ok Then
lasub = Trim(Split(t(i), "(")(0))
content = content & "<button id=""" & VbComp.Name & i & """ label=""" & lasub & """ imageMso=""MailMergeGreetingLineInsert"" onAction=""ExporteLaSub"""
content = content & " tag=""" & VbComp.Name & "|" & lasub & """ />" & vbCrLf
End If
Next
content = content & "</menu>" & vbCrLf
End If
End If
Next

content = content & "</menu>"
Debug.Print content
Exit Sub

ErreurVBA:
MsgBox "Impossible d'accéder au projet VBA." & vbCrLf & _
"Assurez-vous que l'accès au modèle d'objet VBA est activé dans les paramètres de sécurité.", vbCritical
End Sub
 
Bonjour
dis moi un peu ;comment peut on avoir aucun classeur ouvert? avec un xla ouvert?
ou encore quel intérêt aurait on d'ouvrir le xla tout seul ?
 
Bonjour
dis moi un peu ;comment peut on avoir aucun classeur ouvert? avec un xla ouvert?
ou encore quel intérêt aurait on d'ouvrir le xla tout seul ?
Bjr Patrick,
quand j'ouvre excel , je n'ai aucun fichier ouvert (excel est ouvert toute la journée). et donc j'ai testé ton appli qui est génial et en cliquant sur le bouton du ruban (dans développeur) , ca plante. c'est pour cela que j'ai modifié la macro
 
tout simplement par ce que tu l'utilise pas comme un complément
quand tu ouvre excel excel s'ouvre avec le xlstart dont un classeur vierge il peut s'ouvrir aussi avec un xlsb
il faut le cocher dans les complement pour qu'il s'ouvre avec excel automatiquement
voici un classeur ouvert vierge ouvert qui n'as pas de macros
et pour le coup j'ai même deux xla d'ouvert
demo3.gif

donc je répète comment arrive tu a ouvrir excel sans que au moins un classeur vierge s'ouvre avec ?
 
tout simplement par ce que tu l'utilise pas comme un complément
quand tu ouvre excel excel s'ouvre avec le xlstart dont un classeur vierge il peut s'ouvrir aussi avec un xlsb
il faut le cocher dans les complement pour qu'il s'ouvre avec excel automatiquement
voici un classeur ouvert vierge ouvert qui n'as pas de macros
et pour le coup j'ai même deux xla d'ouvert
Regarde la pièce jointe 1219865
donc je répète comment arrive tu a ouvrir excel sans que au moins un classeur vierge s'ouvre avec ?
oui tu as raison, par contre j'ai ouvert un classeur qui comporte énormement de macros . j'ai bien mis dans les compléments le xlam expert. Mais quand je clique sur liste des macros, y'a aucune macros qui s'affiche. je te joins le fichier (confidentiel) avec lequel j'ai testé. peux tu m'expliquer pourquoi ca ne fonctionne pas. (j'ai pris ton fichier original, sans ma modif qui effectivement ne sert à rien)
 

Pièces jointes

d'autant plus qu'en faisant comme ca tu t'interdit le xltm les xlsb etc.... qui eux aussi peuvent avoir des codes
ok je vais regarder avec ton classeur pourquoi la liste des macros et fonctions ne s'auto remplie pas
 
bon deja le menu est créer puisque dans le debug je l'ai
reste plus qu'a savoir qu'est ce qui fait qu'il ne s'affiche pas un caractères interdit dans le nom d'une macro peut être
XML:
<menu xmlns="http://schemas.microsoft.com/office/2006/01/customui" >
<menu id="ThisWorkbook1" label="Module : ThisWorkbook" >
</menu>
<menu id="Feuil12" label="Module : Feuil1" >
<button id="Feuil129" label="Sub ComparerNombresDossiers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Feuil1|Sub ComparerNombresDossiers" />
</menu>
<menu id="Feuil23" label="Module : Feuil2" >
<button id="Feuil229" label="Sub ComparerNombresDossiers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Feuil2|Sub ComparerNombresDossiers" />
</menu>
<menu id="Feuil34" label="Module : Feuil3" >
</menu>
<menu id="Z_FUNCTION_IS_LOADED5" label="Module : Z_FUNCTION_IS_LOADED" >
</menu>
<menu id="MENU6" label="Module : MENU" >
<button id="MENU6" label="Sub Fiche_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Fiche_AfficherFeuilleEtUserForm" />
<button id="MENU13" label="Sub Saisie_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Saisie_AfficherFeuilleEtUserForm" />
<button id="MENU20" label="Sub Travaux_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Travaux_AfficherFeuilleEtUserForm" />
<button id="MENU27" label="Sub PVAG_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub PVAG_AfficherFeuilleEtUserForm" />
<button id="MENU94" label="Sub alimentation_COMBOBOX_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub alimentation_COMBOBOX_CLIENT" />
</menu>
<menu id="USF_SAISIE7" label="Module : USF_SAISIE" >
<button id="USF_SAISIE2" label="Sub Controle_CHECKBOX_Saisie" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Controle_CHECKBOX_Saisie" />
<button id="USF_SAISIE12" label="Sub Controle_CHECKBOX_Verif" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Controle_CHECKBOX_Verif" />
<button id="USF_SAISIE1503" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="USF_SAISIE1521" label="Sub Init_CheckBox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Init_CheckBox" />
<button id="USF_SAISIE1547" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_INFO_CLIENT" />
<button id="USF_SAISIE1644" label="Sub MAJ_STATISTIQUE" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_STATISTIQUE" />
<button id="USF_SAISIE1664" label="Sub MAJ_DATE" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_DATE" />
</menu>
<menu id="DIVERS8" label="Module : DIVERS" >
<button id="DIVERS2" label="Sub lance_usf_suivi_saisie_compta" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_saisie_compta" />
<button id="DIVERS6" label="Sub lance_usf_suivi_travaux_annuel" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_travaux_annuel" />
<button id="DIVERS10" label="Sub lance_usf_suivi_PVAG" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_PVAG" />
<button id="DIVERS14" label="Sub lance_Menu" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_Menu" />
<button id="DIVERS18" label="Sub lance_usf_fiche_client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_fiche_client" />
<button id="DIVERS22" label="Sub OuvrirStatistique" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub OuvrirStatistique" />
<button id="DIVERS26" label="Sub RETOUR_FEUILLE_FICHE_Cliquer" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub RETOUR_FEUILLE_FICHE_Cliquer" />
<button id="DIVERS30" label="Sub Envoi_Outlook" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Envoi_Outlook" />
<button id="DIVERS34" label="Function FormatSIRET" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Function FormatSIRET" />
<button id="DIVERS42" label="Sub ListerNomsGestionnaire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerNomsGestionnaire" />
<button id="DIVERS63" label="Sub ListerTextBoxComboBox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerTextBoxComboBox" />
<button id="DIVERS87" label="Sub ListerElementsUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerElementsUserForm" />
<button id="DIVERS113" label="Sub Sortie_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Sortie_Dossier" />
<button id="DIVERS200" label="Sub Entree_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Entree_Dossier" />
</menu>
<menu id="CALENDAR9" label="Module : CALENDAR" >
<button id="CALENDAR39" label="Public Function ShowX" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function ShowX" />
<button id="CALENDAR69" label="Public Function Showcenter" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function Showcenter" />
<button id="CALENDAR89" label="Public Function ShowTopLeft" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function ShowTopLeft" />
<button id="CALENDAR149" label="Sub Config" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Sub Config" />
<button id="CALENDAR232" label="Public Sub ReloadClavier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Sub ReloadClavier" />
<button id="CALENDAR273" label="Private Function placementRange" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function placementRange" />
<button id="CALENDAR303" label="Private Function placementActivXsheets" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function placementActivXsheets" />
<button id="CALENDAR323" label="Private Function férié" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function férié" />
</menu>
<menu id="USF_TRAVAUX10" label="Module : USF_TRAVAUX" >
<button id="USF_TRAVAUX223" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="USF_TRAVAUX241" label="Sub Suivant_Nom_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Suivant_Nom_Client" />
<button id="USF_TRAVAUX251" label="Sub Precedent_Nom_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Precedent_Nom_Client" />
<button id="USF_TRAVAUX274" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub MAJ_INFO_CLIENT" />
<button id="USF_TRAVAUX390" label="Sub demande_Fermeture_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub demande_Fermeture_Dossier" />
<button id="USF_TRAVAUX407" label="Sub Blocage_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Blocage_Dossier" />
<button id="USF_TRAVAUX464" label="Sub Deblocage_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Deblocage_Dossier" />
<button id="USF_TRAVAUX546" label="Sub MAJ_STATISTIQUES" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub MAJ_STATISTIQUES" />
<button id="USF_TRAVAUX579" label="Sub VERIF_CHECKB" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub VERIF_CHECKB" />
<button id="USF_TRAVAUX757" label="Sub dossier_verrouille" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub dossier_verrouille" />
<button id="USF_TRAVAUX785" label="Sub dossier_deverrouille" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub dossier_deverrouille" />
</menu>
<menu id="Feuil411" label="Module : Feuil4" >
</menu>
<menu id="USF_FICHE_CLIENT12" label="Module : USF_FICHE_CLIENT" >
<button id="USF_FICHE_CLIENT84" label="Sub RemplirPrenomNomDirigeant" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub RemplirPrenomNomDirigeant" />
<button id="USF_FICHE_CLIENT156" label="Function EmailValide" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Function EmailValide" />
<button id="USF_FICHE_CLIENT268" label="Function fctNumeric14Digits" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Function fctNumeric14Digits" />
<button id="USF_FICHE_CLIENT277" label="Public Function verifSiret" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Public Function verifSiret" />
<button id="USF_FICHE_CLIENT401" label="Sub OB_CREATION_Click" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub OB_CREATION_Click" />
<button id="USF_FICHE_CLIENT415" label="Sub Initialisation_Usf_Fiche_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub Initialisation_Usf_Fiche_Client" />
<button id="USF_FICHE_CLIENT507" label="Sub alimentation_COMBOBOX_FICHE_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub alimentation_COMBOBOX_FICHE_CLIENT" />
<button id="USF_FICHE_CLIENT527" label="Sub DerniereCelluleTexteRougeEtInscrire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub DerniereCelluleTexteRougeEtInscrire" />
<button id="USF_FICHE_CLIENT747" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub MAJ_INFO_CLIENT" />
<button id="USF_FICHE_CLIENT813" label="Sub TrierTableaux" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub TrierTableaux" />
</menu>
<menu id="Feuil1113" label="Module : Feuil11" >
</menu>
<menu id="USF_RECH_SUPP_DOSSIER14" label="Module : USF_RECH_SUPP_DOSSIER" >
</menu>
<menu id="USF_PVAG15" label="Module : USF_PVAG" >
<button id="USF_PVAG195" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="USF_PVAG224" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub MAJ_INFO_CLIENT" />
<button id="USF_PVAG254" label="Sub MAJ_STATISTIQUES" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub MAJ_STATISTIQUES" />
<button id="USF_PVAG286" label="Sub VERIF_CHECKB" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub VERIF_CHECKB" />
</menu>
<menu id="USF_TABLEAU_FICHE16" label="Module : USF_TABLEAU_FICHE" >
<button id="USF_TABLEAU_FICHE34" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_FICHE|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_SAISIE17" label="Module : USF_TABLEAU_SAISIE" >
<button id="USF_TABLEAU_SAISIE33" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_SAISIE|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_TRAVAUX18" label="Module : USF_TABLEAU_TRAVAUX" >
<button id="USF_TABLEAU_TRAVAUX33" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_TRAVAUX|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_PVAG19" label="Module : USF_TABLEAU_PVAG" >
<button id="USF_TABLEAU_PVAG33" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_PVAG|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_STATISTIQUE20" label="Module : USF_STATISTIQUE" >
<button id="USF_STATISTIQUE29" label="Sub OuvrirStatistique" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub OuvrirStatistique" />
<button id="USF_STATISTIQUE33" label="Sub Infos_Statistiques" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub Infos_Statistiques" />
<button id="USF_STATISTIQUE72" label="Sub DerniereCelluleTexteRougeEtInscrire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub DerniereCelluleTexteRougeEtInscrire" />
</menu>
<menu id="Feuil521" label="Module : Feuil5" >
</menu>
<menu id="Feuil1222" label="Module : Feuil12" >
</menu>
<menu id="Feuil623" label="Module : Feuil6" >
</menu>
<menu id="JsonConverter24" label="Module : JsonConverter" >
<button id="JsonConverter170" label="Public Function ParseJson" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseJson" />
<button id="JsonConverter197" label="Public Function ConvertToJson" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToJson" />
<button id="JsonConverter459" label="Private Function json_ParseObject" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseObject" />
<button id="JsonConverter491" label="Private Function json_ParseArray" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseArray" />
<button id="JsonConverter515" label="Private Function json_ParseValue" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseValue" />
<button id="JsonConverter542" label="Private Function json_ParseString" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseString" />
<button id="JsonConverter602" label="Private Function json_ParseNumber" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseNumber" />
<button id="JsonConverter635" label="Private Function json_ParseKey" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseKey" />
<button id="JsonConverter663" label="Private Function json_IsUndefined" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_IsUndefined" />
<button id="JsonConverter676" label="Private Function json_Encode" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_Encode" />
<button id="JsonConverter737" label="Private Function json_Peek" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_Peek" />
<button id="JsonConverter750" label="Private Function json_StringIsLargeNumber" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_StringIsLargeNumber" />
<button id="JsonConverter778" label="Private Function json_ParseErrorMessage" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseErrorMessage" />
<button id="JsonConverter854" label="Private Function json_BufferToString" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_BufferToString" />
<button id="JsonConverter891" label="Public Function ParseUtc" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseUtc" />
<button id="JsonConverter920" label="Public Function ConvertToUtc" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToUtc" />
<button id="JsonConverter949" label="Public Function ParseIso" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseIso" />
<button id="JsonConverter1027" label="Public Function ConvertToIso" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToIso" />
<button id="JsonConverter1044" label="Private Function utc_ConvertDate" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_ConvertDate" />
<button id="JsonConverter1075" label="Private Function utc_ExecuteInShell" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_ExecuteInShell" />
<button id="JsonConverter1106" label="Private Function utc_DateToSystemTime" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_DateToSystemTime" />
<button id="JsonConverter1116" label="Private Function utc_SystemTimeToDate" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_SystemTimeToDate" />
</menu>
<menu id="Z_FUNCTION_JSON25" label="Module : Z_FUNCTION_JSON" >
</menu>
<menu id="Z_FUNCTION_PAPPERS26" label="Module : Z_FUNCTION_PAPPERS" >
<button id="Z_FUNCTION_PAPPERS5" label="Function Extraction_champ" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Z_FUNCTION_PAPPERS|Function Extraction_champ" />
<button id="Z_FUNCTION_PAPPERS42" label="Sub Rapatrie_Infos_Pappers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Z_FUNCTION_PAPPERS|Sub Rapatrie_Infos_Pappers" />
</menu>
<menu id="Feuil727" label="Module : Feuil7" >
</menu>
<menu id="Feuil828" label="Module : Feuil8" >
</menu>
<menu id="COPY_INFO_SIREN29" label="Module : COPY_INFO_SIREN" >
<button id="COPY_INFO_SIREN2" label="Sub CopierDonneesSirenEtMettreAJourSommaire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="COPY_INFO_SIREN|Sub CopierDonneesSirenEtMettreAJourSommaire" />
<button id="COPY_INFO_SIREN88" label="Sub MettreAJourSommaireInteractif" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="COPY_INFO_SIREN|Sub MettreAJourSommaireInteractif" />
</menu>
<menu id="LISTE_FEUILLE_FICHE30" label="Module : LISTE_FEUILLE_FICHE" >
<button id="LISTE_FEUILLE_FICHE2" label="Sub CreerListeValidationDepuisFICHE_SIREN" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="LISTE_FEUILLE_FICHE|Sub CreerListeValidationDepuisFICHE_SIREN" />
</menu>
<menu id="FICHE_PAPPERS31" label="Module : FICHE_PAPPERS" >
</menu>
<menu id="MAIL_OUTLOOK32" label="Module : MAIL_OUTLOOK" >
</menu>
<menu id="MxgBox_Positionné33" label="Module : MxgBox_Positionné" >
<button id="MxgBox_Positionné51" label="Function MsgBoxPos" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Function MsgBoxPos" />
<button id="MxgBox_Positionné58" label="Sub repositionneMsgbox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Sub repositionneMsgbox" />
</menu>
<menu id="cOutlookData34" label="Module : cOutlookData" >
<button id="cOutlookData86" label="Public Sub SetTabEmbbededImages" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabEmbbededImages" />
<button id="cOutlookData102" label="Public Sub SetTabAttachments" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabAttachments" />
<button id="cOutlookData122" label="Public Function GetAttachment" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Function GetAttachment" />
<button id="cOutlookData141" label="Private Function IsArrayInitialized" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Private Function IsArrayInitialized" />
</menu>
<menu id="Module_OUTLOOK_API35" label="Module : Module_OUTLOOK_API" >
<button id="Module_OUTLOOK_API2" label="Public Function GetOutlookAccountObject" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function GetOutlookAccountObject" />
<button id="Module_OUTLOOK_API16" label="Public Function ListeComptesOutlook" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function ListeComptesOutlook" />
</menu>
<menu id="UserForm_SaisieObjet36" label="Module : UserForm_SaisieObjet" >
<button id="UserForm_SaisieObjet4" label="Public Function ShowModalAndReturnSujet" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="UserForm_SaisieObjet|Public Function ShowModalAndReturnSujet" />
</menu>
</menu>
 
bon deja le menu est créer puisque dans le debug je l'ai
reste plus qu'a savoir qu'est ce qui fait qu'il ne s'affiche pas un caractères interdit dans le nom d'une macro peut être
XML:
<menu xmlns="http://schemas.microsoft.com/office/2006/01/customui" >
<menu id="ThisWorkbook1" label="Module : ThisWorkbook" >
</menu>
<menu id="Feuil12" label="Module : Feuil1" >
<button id="Feuil129" label="Sub ComparerNombresDossiers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Feuil1|Sub ComparerNombresDossiers" />
</menu>
<menu id="Feuil23" label="Module : Feuil2" >
<button id="Feuil229" label="Sub ComparerNombresDossiers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Feuil2|Sub ComparerNombresDossiers" />
</menu>
<menu id="Feuil34" label="Module : Feuil3" >
</menu>
<menu id="Z_FUNCTION_IS_LOADED5" label="Module : Z_FUNCTION_IS_LOADED" >
</menu>
<menu id="MENU6" label="Module : MENU" >
<button id="MENU6" label="Sub Fiche_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Fiche_AfficherFeuilleEtUserForm" />
<button id="MENU13" label="Sub Saisie_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Saisie_AfficherFeuilleEtUserForm" />
<button id="MENU20" label="Sub Travaux_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Travaux_AfficherFeuilleEtUserForm" />
<button id="MENU27" label="Sub PVAG_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub PVAG_AfficherFeuilleEtUserForm" />
<button id="MENU94" label="Sub alimentation_COMBOBOX_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub alimentation_COMBOBOX_CLIENT" />
</menu>
<menu id="USF_SAISIE7" label="Module : USF_SAISIE" >
<button id="USF_SAISIE2" label="Sub Controle_CHECKBOX_Saisie" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Controle_CHECKBOX_Saisie" />
<button id="USF_SAISIE12" label="Sub Controle_CHECKBOX_Verif" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Controle_CHECKBOX_Verif" />
<button id="USF_SAISIE1503" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="USF_SAISIE1521" label="Sub Init_CheckBox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Init_CheckBox" />
<button id="USF_SAISIE1547" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_INFO_CLIENT" />
<button id="USF_SAISIE1644" label="Sub MAJ_STATISTIQUE" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_STATISTIQUE" />
<button id="USF_SAISIE1664" label="Sub MAJ_DATE" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_DATE" />
</menu>
<menu id="DIVERS8" label="Module : DIVERS" >
<button id="DIVERS2" label="Sub lance_usf_suivi_saisie_compta" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_saisie_compta" />
<button id="DIVERS6" label="Sub lance_usf_suivi_travaux_annuel" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_travaux_annuel" />
<button id="DIVERS10" label="Sub lance_usf_suivi_PVAG" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_PVAG" />
<button id="DIVERS14" label="Sub lance_Menu" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_Menu" />
<button id="DIVERS18" label="Sub lance_usf_fiche_client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_fiche_client" />
<button id="DIVERS22" label="Sub OuvrirStatistique" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub OuvrirStatistique" />
<button id="DIVERS26" label="Sub RETOUR_FEUILLE_FICHE_Cliquer" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub RETOUR_FEUILLE_FICHE_Cliquer" />
<button id="DIVERS30" label="Sub Envoi_Outlook" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Envoi_Outlook" />
<button id="DIVERS34" label="Function FormatSIRET" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Function FormatSIRET" />
<button id="DIVERS42" label="Sub ListerNomsGestionnaire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerNomsGestionnaire" />
<button id="DIVERS63" label="Sub ListerTextBoxComboBox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerTextBoxComboBox" />
<button id="DIVERS87" label="Sub ListerElementsUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerElementsUserForm" />
<button id="DIVERS113" label="Sub Sortie_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Sortie_Dossier" />
<button id="DIVERS200" label="Sub Entree_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Entree_Dossier" />
</menu>
<menu id="CALENDAR9" label="Module : CALENDAR" >
<button id="CALENDAR39" label="Public Function ShowX" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function ShowX" />
<button id="CALENDAR69" label="Public Function Showcenter" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function Showcenter" />
<button id="CALENDAR89" label="Public Function ShowTopLeft" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function ShowTopLeft" />
<button id="CALENDAR149" label="Sub Config" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Sub Config" />
<button id="CALENDAR232" label="Public Sub ReloadClavier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Sub ReloadClavier" />
<button id="CALENDAR273" label="Private Function placementRange" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function placementRange" />
<button id="CALENDAR303" label="Private Function placementActivXsheets" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function placementActivXsheets" />
<button id="CALENDAR323" label="Private Function férié" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function férié" />
</menu>
<menu id="USF_TRAVAUX10" label="Module : USF_TRAVAUX" >
<button id="USF_TRAVAUX223" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="USF_TRAVAUX241" label="Sub Suivant_Nom_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Suivant_Nom_Client" />
<button id="USF_TRAVAUX251" label="Sub Precedent_Nom_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Precedent_Nom_Client" />
<button id="USF_TRAVAUX274" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub MAJ_INFO_CLIENT" />
<button id="USF_TRAVAUX390" label="Sub demande_Fermeture_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub demande_Fermeture_Dossier" />
<button id="USF_TRAVAUX407" label="Sub Blocage_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Blocage_Dossier" />
<button id="USF_TRAVAUX464" label="Sub Deblocage_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Deblocage_Dossier" />
<button id="USF_TRAVAUX546" label="Sub MAJ_STATISTIQUES" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub MAJ_STATISTIQUES" />
<button id="USF_TRAVAUX579" label="Sub VERIF_CHECKB" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub VERIF_CHECKB" />
<button id="USF_TRAVAUX757" label="Sub dossier_verrouille" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub dossier_verrouille" />
<button id="USF_TRAVAUX785" label="Sub dossier_deverrouille" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub dossier_deverrouille" />
</menu>
<menu id="Feuil411" label="Module : Feuil4" >
</menu>
<menu id="USF_FICHE_CLIENT12" label="Module : USF_FICHE_CLIENT" >
<button id="USF_FICHE_CLIENT84" label="Sub RemplirPrenomNomDirigeant" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub RemplirPrenomNomDirigeant" />
<button id="USF_FICHE_CLIENT156" label="Function EmailValide" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Function EmailValide" />
<button id="USF_FICHE_CLIENT268" label="Function fctNumeric14Digits" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Function fctNumeric14Digits" />
<button id="USF_FICHE_CLIENT277" label="Public Function verifSiret" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Public Function verifSiret" />
<button id="USF_FICHE_CLIENT401" label="Sub OB_CREATION_Click" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub OB_CREATION_Click" />
<button id="USF_FICHE_CLIENT415" label="Sub Initialisation_Usf_Fiche_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub Initialisation_Usf_Fiche_Client" />
<button id="USF_FICHE_CLIENT507" label="Sub alimentation_COMBOBOX_FICHE_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub alimentation_COMBOBOX_FICHE_CLIENT" />
<button id="USF_FICHE_CLIENT527" label="Sub DerniereCelluleTexteRougeEtInscrire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub DerniereCelluleTexteRougeEtInscrire" />
<button id="USF_FICHE_CLIENT747" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub MAJ_INFO_CLIENT" />
<button id="USF_FICHE_CLIENT813" label="Sub TrierTableaux" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub TrierTableaux" />
</menu>
<menu id="Feuil1113" label="Module : Feuil11" >
</menu>
<menu id="USF_RECH_SUPP_DOSSIER14" label="Module : USF_RECH_SUPP_DOSSIER" >
</menu>
<menu id="USF_PVAG15" label="Module : USF_PVAG" >
<button id="USF_PVAG195" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="USF_PVAG224" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub MAJ_INFO_CLIENT" />
<button id="USF_PVAG254" label="Sub MAJ_STATISTIQUES" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub MAJ_STATISTIQUES" />
<button id="USF_PVAG286" label="Sub VERIF_CHECKB" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub VERIF_CHECKB" />
</menu>
<menu id="USF_TABLEAU_FICHE16" label="Module : USF_TABLEAU_FICHE" >
<button id="USF_TABLEAU_FICHE34" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_FICHE|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_SAISIE17" label="Module : USF_TABLEAU_SAISIE" >
<button id="USF_TABLEAU_SAISIE33" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_SAISIE|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_TRAVAUX18" label="Module : USF_TABLEAU_TRAVAUX" >
<button id="USF_TABLEAU_TRAVAUX33" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_TRAVAUX|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_PVAG19" label="Module : USF_TABLEAU_PVAG" >
<button id="USF_TABLEAU_PVAG33" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_PVAG|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_STATISTIQUE20" label="Module : USF_STATISTIQUE" >
<button id="USF_STATISTIQUE29" label="Sub OuvrirStatistique" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub OuvrirStatistique" />
<button id="USF_STATISTIQUE33" label="Sub Infos_Statistiques" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub Infos_Statistiques" />
<button id="USF_STATISTIQUE72" label="Sub DerniereCelluleTexteRougeEtInscrire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub DerniereCelluleTexteRougeEtInscrire" />
</menu>
<menu id="Feuil521" label="Module : Feuil5" >
</menu>
<menu id="Feuil1222" label="Module : Feuil12" >
</menu>
<menu id="Feuil623" label="Module : Feuil6" >
</menu>
<menu id="JsonConverter24" label="Module : JsonConverter" >
<button id="JsonConverter170" label="Public Function ParseJson" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseJson" />
<button id="JsonConverter197" label="Public Function ConvertToJson" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToJson" />
<button id="JsonConverter459" label="Private Function json_ParseObject" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseObject" />
<button id="JsonConverter491" label="Private Function json_ParseArray" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseArray" />
<button id="JsonConverter515" label="Private Function json_ParseValue" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseValue" />
<button id="JsonConverter542" label="Private Function json_ParseString" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseString" />
<button id="JsonConverter602" label="Private Function json_ParseNumber" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseNumber" />
<button id="JsonConverter635" label="Private Function json_ParseKey" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseKey" />
<button id="JsonConverter663" label="Private Function json_IsUndefined" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_IsUndefined" />
<button id="JsonConverter676" label="Private Function json_Encode" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_Encode" />
<button id="JsonConverter737" label="Private Function json_Peek" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_Peek" />
<button id="JsonConverter750" label="Private Function json_StringIsLargeNumber" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_StringIsLargeNumber" />
<button id="JsonConverter778" label="Private Function json_ParseErrorMessage" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseErrorMessage" />
<button id="JsonConverter854" label="Private Function json_BufferToString" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_BufferToString" />
<button id="JsonConverter891" label="Public Function ParseUtc" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseUtc" />
<button id="JsonConverter920" label="Public Function ConvertToUtc" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToUtc" />
<button id="JsonConverter949" label="Public Function ParseIso" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseIso" />
<button id="JsonConverter1027" label="Public Function ConvertToIso" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToIso" />
<button id="JsonConverter1044" label="Private Function utc_ConvertDate" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_ConvertDate" />
<button id="JsonConverter1075" label="Private Function utc_ExecuteInShell" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_ExecuteInShell" />
<button id="JsonConverter1106" label="Private Function utc_DateToSystemTime" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_DateToSystemTime" />
<button id="JsonConverter1116" label="Private Function utc_SystemTimeToDate" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_SystemTimeToDate" />
</menu>
<menu id="Z_FUNCTION_JSON25" label="Module : Z_FUNCTION_JSON" >
</menu>
<menu id="Z_FUNCTION_PAPPERS26" label="Module : Z_FUNCTION_PAPPERS" >
<button id="Z_FUNCTION_PAPPERS5" label="Function Extraction_champ" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Z_FUNCTION_PAPPERS|Function Extraction_champ" />
<button id="Z_FUNCTION_PAPPERS42" label="Sub Rapatrie_Infos_Pappers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Z_FUNCTION_PAPPERS|Sub Rapatrie_Infos_Pappers" />
</menu>
<menu id="Feuil727" label="Module : Feuil7" >
</menu>
<menu id="Feuil828" label="Module : Feuil8" >
</menu>
<menu id="COPY_INFO_SIREN29" label="Module : COPY_INFO_SIREN" >
<button id="COPY_INFO_SIREN2" label="Sub CopierDonneesSirenEtMettreAJourSommaire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="COPY_INFO_SIREN|Sub CopierDonneesSirenEtMettreAJourSommaire" />
<button id="COPY_INFO_SIREN88" label="Sub MettreAJourSommaireInteractif" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="COPY_INFO_SIREN|Sub MettreAJourSommaireInteractif" />
</menu>
<menu id="LISTE_FEUILLE_FICHE30" label="Module : LISTE_FEUILLE_FICHE" >
<button id="LISTE_FEUILLE_FICHE2" label="Sub CreerListeValidationDepuisFICHE_SIREN" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="LISTE_FEUILLE_FICHE|Sub CreerListeValidationDepuisFICHE_SIREN" />
</menu>
<menu id="FICHE_PAPPERS31" label="Module : FICHE_PAPPERS" >
</menu>
<menu id="MAIL_OUTLOOK32" label="Module : MAIL_OUTLOOK" >
</menu>
<menu id="MxgBox_Positionné33" label="Module : MxgBox_Positionné" >
<button id="MxgBox_Positionné51" label="Function MsgBoxPos" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Function MsgBoxPos" />
<button id="MxgBox_Positionné58" label="Sub repositionneMsgbox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Sub repositionneMsgbox" />
</menu>
<menu id="cOutlookData34" label="Module : cOutlookData" >
<button id="cOutlookData86" label="Public Sub SetTabEmbbededImages" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabEmbbededImages" />
<button id="cOutlookData102" label="Public Sub SetTabAttachments" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabAttachments" />
<button id="cOutlookData122" label="Public Function GetAttachment" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Function GetAttachment" />
<button id="cOutlookData141" label="Private Function IsArrayInitialized" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Private Function IsArrayInitialized" />
</menu>
<menu id="Module_OUTLOOK_API35" label="Module : Module_OUTLOOK_API" >
<button id="Module_OUTLOOK_API2" label="Public Function GetOutlookAccountObject" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function GetOutlookAccountObject" />
<button id="Module_OUTLOOK_API16" label="Public Function ListeComptesOutlook" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function ListeComptesOutlook" />
</menu>
<menu id="UserForm_SaisieObjet36" label="Module : UserForm_SaisieObjet" >
<button id="UserForm_SaisieObjet4" label="Public Function ShowModalAndReturnSujet" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="UserForm_SaisieObjet|Public Function ShowModalAndReturnSujet" />
</menu>
</menu>
Bonjour à tous,
je me suis aussi penché sur le Prb
et quand je valide le ruban
j'ai
1751185362586.png

pour le corriger j'ai mis par exemple
1751185429358.png


si ça peut aider🙂
 
voila l'erreur

1751185210903.png

donc pour le coup j'ai modifier la chose pour qu'un id ne puisse pas être en doublons
voici le callback corrigé
VB:
'procedure {getContent} de remplissage du DynamicMenu[ID:''dynamicMenu_2'' Label:''Liste Macro'']'dans le parent [group_2'' Label:''Export Sub et Fonctions'']
Public Sub dynamicMenu_2_getContent(ctl As IRibbonControl, ByRef content)
    Dim VbComp, VbComps, code, t, i&, ok As Boolean, lasub, a, cl&, idx, pl&
    Set VbComps = ActiveWorkbook.VBProject.VBComponents
    content = "<menu xmlns=""http://schemas.microsoft.com/office/2006/01/customui"" >" & vbCrLf 'ouverture de la balise menu
    For Each VbComp In VbComps
         cl = VbComp.CodeModule.CountOfLines
        
        If cl > 0 Then
        code = VbComp.CodeModule.Lines(1, VbComp.CodeModule.CountOfLines)
        If Trim(code) <> "" Then
            pl = pl + 1: idx = "M" & Format(Date + pl, "yyyymmdd")
       a = a + 1
            content = content & "<menu id=""" & VbComp.Name & idx & a & Chr(34) & " label=""Module : " & VbComp.Name & """ >" & vbCrLf
            t = Split(code & vbCrLf, vbCrLf)
            For i = 1 To UBound(t)
                ok = False
                Select Case True
                    Case Left(Trim(t(i)), 4) = "Sub "
                        ok = True
                    Case Left(Trim(t(i)), 11) = "Private Sub "
                        ok = True
                    Case Left(Trim(t(i)), 11) = "Public Sub "
                        ok = True
                    Case Left(Trim(t(i)), 9) = "Function "
                        ok = True
                    Case Left(Trim(t(i)), 17) = "Private Function "
                        ok = True
                    Case Left(Trim(t(i)), 16) = "Public Function "
                        ok = True
                End Select
                If ok Then
                   lasub = Trim(Split(t(i), "(")(0))
                    content = content & "<button id=""B" & VbComp.Name & CLng(Date + i) & """ label=""" & lasub & """ imageMso=""MailMergeGreetingLineInsert"" onAction=""ExporteLaSub"""
                    content = content & " tag=""" & VbComp.Name & "|" & lasub & """ />" & vbCrLf
                End If
            Next
        content = content & "</menu>" & vbCrLf
 End If
     End If
   Next
    DoEvents
    content = content & "</menu>"
    Debug.Print content
End Sub
et là ta liste de module et macro fonctionne
demo3.gif

voici le menu qui est créé
XML:
</menu>
<menu id="MAIL_OUTLOOKM2025073132" label="Module : MAIL_OUTLOOK" >
</menu>
<menu id="MxgBox_PositionnéM2025080133" label="Module : MxgBox_Positionné" >
<button id="BMxgBox_Positionné45888" label="Function MsgBoxPos" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Function MsgBoxPos" />
<button id="BMxgBox_Positionné45895" label="Sub repositionneMsgbox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Sub repositionneMsgbox" />
</menu>
<menu id="cOutlookDataM2025080234" label="Module : cOutlookData" >
<button id="BcOutlookData45923" label="Public Sub SetTabEmbbededImages" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabEmbbededImages" />
<button id="BcOutlookData45939" label="Public Sub SetTabAttachments" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabAttachments" />
<button id="BcOutlookData45959" label="Public Function GetAttachment" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Function GetAttachment" />
<button id="BcOutlookData45978" label="Private Function IsArrayInitialized" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Private Function IsArrayInitialized" />
</menu>
<menu id="Module_OUTLOOK_APIM2025080335" label="Module : Module_OUTLOOK_API" >
<button id="BModule_OUTLOOK_API45839" label="Public Function GetOutlookAccountObject" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function GetOutlookAccountObject" />
<button id="BModule_OUTLOOK_API45853" label="Public Function ListeComptesOutlook" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function ListeComptesOutlook" />
</menu>
<menu id="UserForm_SaisieObjetM2025080436" label="Module : UserForm_SaisieObjet" >
<button id="BUserForm_SaisieObjet45841" label="Public Function ShowModalAndReturnSujet" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="UserForm_SaisieObjet|Public Function ShowModalAndReturnSujet" />
</menu><menu xmlns="http://schemas.microsoft.com/office/2006/01/customui" >
<menu id="ThisWorkbookM202506301" label="Module : ThisWorkbook" >
</menu>
<menu id="Feuil1M202507012" label="Module : Feuil1" >
<button id="BFeuil145866" label="Sub ComparerNombresDossiers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Feuil1|Sub ComparerNombresDossiers" />
</menu>
<menu id="Feuil2M202507023" label="Module : Feuil2" >
<button id="BFeuil245866" label="Sub ComparerNombresDossiers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Feuil2|Sub ComparerNombresDossiers" />
</menu>
<menu id="Feuil3M202507034" label="Module : Feuil3" >
</menu>
<menu id="Z_FUNCTION_IS_LOADEDM202507045" label="Module : Z_FUNCTION_IS_LOADED" >
</menu>
<menu id="MENUM202507056" label="Module : MENU" >
<button id="BMENU45843" label="Sub Fiche_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Fiche_AfficherFeuilleEtUserForm" />
<button id="BMENU45850" label="Sub Saisie_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Saisie_AfficherFeuilleEtUserForm" />
<button id="BMENU45857" label="Sub Travaux_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Travaux_AfficherFeuilleEtUserForm" />
<button id="BMENU45864" label="Sub PVAG_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub PVAG_AfficherFeuilleEtUserForm" />
<button id="BMENU45931" label="Sub alimentation_COMBOBOX_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub alimentation_COMBOBOX_CLIENT" />
</menu>
<menu id="USF_SAISIEM202507067" label="Module : USF_SAISIE" >
<button id="BUSF_SAISIE45839" label="Sub Controle_CHECKBOX_Saisie" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Controle_CHECKBOX_Saisie" />
<button id="BUSF_SAISIE45849" label="Sub Controle_CHECKBOX_Verif" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Controle_CHECKBOX_Verif" />
<button id="BUSF_SAISIE47340" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="BUSF_SAISIE47358" label="Sub Init_CheckBox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Init_CheckBox" />
<button id="BUSF_SAISIE47384" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_INFO_CLIENT" />
<button id="BUSF_SAISIE47481" label="Sub MAJ_STATISTIQUE" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_STATISTIQUE" />
<button id="BUSF_SAISIE47501" label="Sub MAJ_DATE" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_DATE" />
</menu>
<menu id="DIVERSM202507078" label="Module : DIVERS" >
<button id="BDIVERS45839" label="Sub lance_usf_suivi_saisie_compta" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_saisie_compta" />
<button id="BDIVERS45843" label="Sub lance_usf_suivi_travaux_annuel" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_travaux_annuel" />
<button id="BDIVERS45847" label="Sub lance_usf_suivi_PVAG" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_PVAG" />
<button id="BDIVERS45851" label="Sub lance_Menu" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_Menu" />
<button id="BDIVERS45855" label="Sub lance_usf_fiche_client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_fiche_client" />
<button id="BDIVERS45859" label="Sub OuvrirStatistique" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub OuvrirStatistique" />
<button id="BDIVERS45863" label="Sub RETOUR_FEUILLE_FICHE_Cliquer" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub RETOUR_FEUILLE_FICHE_Cliquer" />
<button id="BDIVERS45867" label="Sub Envoi_Outlook" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Envoi_Outlook" />
<button id="BDIVERS45871" label="Function FormatSIRET" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Function FormatSIRET" />
<button id="BDIVERS45879" label="Sub ListerNomsGestionnaire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerNomsGestionnaire" />
<button id="BDIVERS45900" label="Sub ListerTextBoxComboBox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerTextBoxComboBox" />
<button id="BDIVERS45924" label="Sub ListerElementsUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerElementsUserForm" />
<button id="BDIVERS45950" label="Sub Sortie_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Sortie_Dossier" />
<button id="BDIVERS46037" label="Sub Entree_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Entree_Dossier" />
</menu>
<menu id="CALENDARM202507089" label="Module : CALENDAR" >
<button id="BCALENDAR45876" label="Public Function ShowX" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function ShowX" />
<button id="BCALENDAR45906" label="Public Function Showcenter" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function Showcenter" />
<button id="BCALENDAR45926" label="Public Function ShowTopLeft" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function ShowTopLeft" />
<button id="BCALENDAR45990" label="Sub Config" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Sub Config" />
<button id="BCALENDAR46073" label="Public Sub ReloadClavier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Sub ReloadClavier" />
<button id="BCALENDAR46114" label="Private Function placementRange" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function placementRange" />
<button id="BCALENDAR46144" label="Private Function placementActivXsheets" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function placementActivXsheets" />
<button id="BCALENDAR46164" label="Private Function férié" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function férié" />
</menu>
<menu id="USF_TRAVAUXM2025070910" label="Module : USF_TRAVAUX" >
<button id="BUSF_TRAVAUX46060" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="BUSF_TRAVAUX46078" label="Sub Suivant_Nom_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Suivant_Nom_Client" />
<button id="BUSF_TRAVAUX46088" label="Sub Precedent_Nom_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Precedent_Nom_Client" />
<button id="BUSF_TRAVAUX46111" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub MAJ_INFO_CLIENT" />
<button id="BUSF_TRAVAUX46227" label="Sub demande_Fermeture_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub demande_Fermeture_Dossier" />
<button id="BUSF_TRAVAUX46244" label="Sub Blocage_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Blocage_Dossier" />
<button id="BUSF_TRAVAUX46301" label="Sub Deblocage_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Deblocage_Dossier" />
<button id="BUSF_TRAVAUX46383" label="Sub MAJ_STATISTIQUES" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub MAJ_STATISTIQUES" />
<button id="BUSF_TRAVAUX46416" label="Sub VERIF_CHECKB" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub VERIF_CHECKB" />
<button id="BUSF_TRAVAUX46594" label="Sub dossier_verrouille" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub dossier_verrouille" />
<button id="BUSF_TRAVAUX46622" label="Sub dossier_deverrouille" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub dossier_deverrouille" />
</menu>
<menu id="Feuil4M2025071011" label="Module : Feuil4" >
</menu>
<menu id="USF_FICHE_CLIENTM2025071112" label="Module : USF_FICHE_CLIENT" >
<button id="BUSF_FICHE_CLIENT45921" label="Sub RemplirPrenomNomDirigeant" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub RemplirPrenomNomDirigeant" />
<button id="BUSF_FICHE_CLIENT45993" label="Function EmailValide" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Function EmailValide" />
<button id="BUSF_FICHE_CLIENT46105" label="Function fctNumeric14Digits" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Function fctNumeric14Digits" />
<button id="BUSF_FICHE_CLIENT46114" label="Public Function verifSiret" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Public Function verifSiret" />
<button id="BUSF_FICHE_CLIENT46238" label="Sub OB_CREATION_Click" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub OB_CREATION_Click" />
<button id="BUSF_FICHE_CLIENT46252" label="Sub Initialisation_Usf_Fiche_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub Initialisation_Usf_Fiche_Client" />
<button id="BUSF_FICHE_CLIENT46344" label="Sub alimentation_COMBOBOX_FICHE_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub alimentation_COMBOBOX_FICHE_CLIENT" />
<button id="BUSF_FICHE_CLIENT46364" label="Sub DerniereCelluleTexteRougeEtInscrire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub DerniereCelluleTexteRougeEtInscrire" />
<button id="BUSF_FICHE_CLIENT46584" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub MAJ_INFO_CLIENT" />
<button id="BUSF_FICHE_CLIENT46650" label="Sub TrierTableaux" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub TrierTableaux" />
</menu>
<menu id="Feuil11M2025071213" label="Module : Feuil11" >
</menu>
<menu id="USF_RECH_SUPP_DOSSIERM2025071314" label="Module : USF_RECH_SUPP_DOSSIER" >
</menu>
<menu id="USF_PVAGM2025071415" label="Module : USF_PVAG" >
<button id="BUSF_PVAG46032" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="BUSF_PVAG46061" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub MAJ_INFO_CLIENT" />
<button id="BUSF_PVAG46091" label="Sub MAJ_STATISTIQUES" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub MAJ_STATISTIQUES" />
<button id="BUSF_PVAG46123" label="Sub VERIF_CHECKB" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub VERIF_CHECKB" />
</menu>
<menu id="USF_TABLEAU_FICHEM2025071516" label="Module : USF_TABLEAU_FICHE" >
<button id="BUSF_TABLEAU_FICHE45871" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_FICHE|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_SAISIEM2025071617" label="Module : USF_TABLEAU_SAISIE" >
<button id="BUSF_TABLEAU_SAISIE45870" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_SAISIE|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_TRAVAUXM2025071718" label="Module : USF_TABLEAU_TRAVAUX" >
<button id="BUSF_TABLEAU_TRAVAUX45870" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_TRAVAUX|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_PVAGM2025071819" label="Module : USF_TABLEAU_PVAG" >
<button id="BUSF_TABLEAU_PVAG45870" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_PVAG|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_STATISTIQUEM2025071920" label="Module : USF_STATISTIQUE" >
<button id="BUSF_STATISTIQUE45866" label="Sub OuvrirStatistique" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub OuvrirStatistique" />
<button id="BUSF_STATISTIQUE45870" label="Sub Infos_Statistiques" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub Infos_Statistiques" />
<button id="BUSF_STATISTIQUE45909" label="Sub DerniereCelluleTexteRougeEtInscrire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub DerniereCelluleTexteRougeEtInscrire" />
</menu>
<menu id="Feuil5M2025072021" label="Module : Feuil5" >
</menu>
<menu id="Feuil12M2025072122" label="Module : Feuil12" >
</menu>
<menu id="Feuil6M2025072223" label="Module : Feuil6" >
</menu>
<menu id="JsonConverterM2025072324" label="Module : JsonConverter" >
<button id="BJsonConverter46007" label="Public Function ParseJson" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseJson" />
<button id="BJsonConverter46034" label="Public Function ConvertToJson" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToJson" />
<button id="BJsonConverter46296" label="Private Function json_ParseObject" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseObject" />
<button id="BJsonConverter46328" label="Private Function json_ParseArray" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseArray" />
<button id="BJsonConverter46352" label="Private Function json_ParseValue" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseValue" />
<button id="BJsonConverter46379" label="Private Function json_ParseString" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseString" />
<button id="BJsonConverter46439" label="Private Function json_ParseNumber" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseNumber" />
<button id="BJsonConverter46472" label="Private Function json_ParseKey" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseKey" />
<button id="BJsonConverter46500" label="Private Function json_IsUndefined" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_IsUndefined" />
<button id="BJsonConverter46513" label="Private Function json_Encode" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_Encode" />
<button id="BJsonConverter46574" label="Private Function json_Peek" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_Peek" />
<button id="BJsonConverter46587" label="Private Function json_StringIsLargeNumber" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_StringIsLargeNumber" />
<button id="BJsonConverter46615" label="Private Function json_ParseErrorMessage" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseErrorMessage" />
<button id="BJsonConverter46691" label="Private Function json_BufferToString" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_BufferToString" />
<button id="BJsonConverter46728" label="Public Function ParseUtc" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseUtc" />
<button id="BJsonConverter46757" label="Public Function ConvertToUtc" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToUtc" />
<button id="BJsonConverter46786" label="Public Function ParseIso" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseIso" />
<button id="BJsonConverter46864" label="Public Function ConvertToIso" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToIso" />
<button id="BJsonConverter46881" label="Private Function utc_ConvertDate" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_ConvertDate" />
<button id="BJsonConverter46912" label="Private Function utc_ExecuteInShell" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_ExecuteInShell" />
<button id="BJsonConverter46943" label="Private Function utc_DateToSystemTime" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_DateToSystemTime" />
<button id="BJsonConverter46953" label="Private Function utc_SystemTimeToDate" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_SystemTimeToDate" />
</menu>
<menu id="Z_FUNCTION_JSONM2025072425" label="Module : Z_FUNCTION_JSON" >
</menu>
<menu id="Z_FUNCTION_PAPPERSM2025072526" label="Module : Z_FUNCTION_PAPPERS" >
<button id="BZ_FUNCTION_PAPPERS45842" label="Function Extraction_champ" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Z_FUNCTION_PAPPERS|Function Extraction_champ" />
<button id="BZ_FUNCTION_PAPPERS45879" label="Sub Rapatrie_Infos_Pappers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Z_FUNCTION_PAPPERS|Sub Rapatrie_Infos_Pappers" />
</menu>
<menu id="Feuil7M2025072627" label="Module : Feuil7" >
</menu>
<menu id="Feuil8M2025072728" label="Module : Feuil8" >
</menu>
<menu id="COPY_INFO_SIRENM2025072829" label="Module : COPY_INFO_SIREN" >
<button id="BCOPY_INFO_SIREN45839" label="Sub CopierDonneesSirenEtMettreAJourSommaire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="COPY_INFO_SIREN|Sub CopierDonneesSirenEtMettreAJourSommaire" />
<button id="BCOPY_INFO_SIREN45925" label="Sub MettreAJourSommaireInteractif" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="COPY_INFO_SIREN|Sub MettreAJourSommaireInteractif" />
</menu>
<menu id="LISTE_FEUILLE_FICHEM2025072930" label="Module : LISTE_FEUILLE_FICHE" >
<button id="BLISTE_FEUILLE_FICHE45839" label="Sub CreerListeValidationDepuisFICHE_SIREN" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="LISTE_FEUILLE_FICHE|Sub CreerListeValidationDepuisFICHE_SIREN" />
</menu>
<menu id="FICHE_PAPPERSM2025073031" label="Module : FICHE_PAPPERS" >
</menu>
<menu id="MAIL_OUTLOOKM2025073132" label="Module : MAIL_OUTLOOK" >
</menu>
<menu id="MxgBox_PositionnéM2025080133" label="Module : MxgBox_Positionné" >
<button id="BMxgBox_Positionné45888" label="Function MsgBoxPos" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Function MsgBoxPos" />
<button id="BMxgBox_Positionné45895" label="Sub repositionneMsgbox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Sub repositionneMsgbox" />
</menu>
<menu id="cOutlookDataM2025080234" label="Module : cOutlookData" >
<button id="BcOutlookData45923" label="Public Sub SetTabEmbbededImages" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabEmbbededImages" />
<button id="BcOutlookData45939" label="Public Sub SetTabAttachments" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabAttachments" />
<button id="BcOutlookData45959" label="Public Function GetAttachment" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Function GetAttachment" />
<button id="BcOutlookData45978" label="Private Function IsArrayInitialized" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Private Function IsArrayInitialized" />
</menu>
<menu id="Module_OUTLOOK_APIM2025080335" label="Module : Module_OUTLOOK_API" >
<button id="BModule_OUTLOOK_API45839" label="Public Function GetOutlookAccountObject" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function GetOutlookAccountObject" />
<button id="BModule_OUTLOOK_API45853" label="Public Function ListeComptesOutlook" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function ListeComptesOutlook" />
</menu>
<menu id="UserForm_SaisieObjetM2025080436" label="Module : UserForm_SaisieObjet" >
<button id="BUserForm_SaisieObjet45841" label="Public Function ShowModalAndReturnSujet" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="UserForm_SaisieObjet|Public Function ShowModalAndReturnSujet" />
</menu>
</menu>

</menu>
il ne pourra plus avoir d'ambiguité sur un Id pour menu/bouton
 
voila l'erreur

Regarde la pièce jointe 1219868
donc pour le coup j'ai modifier la chose pour qu'un id ne puisse pas être en doublons
voici le callback corrigé
VB:
'procedure {getContent} de remplissage du DynamicMenu[ID:''dynamicMenu_2'' Label:''Liste Macro'']'dans le parent [group_2'' Label:''Export Sub et Fonctions'']
Public Sub dynamicMenu_2_getContent(ctl As IRibbonControl, ByRef content)
    Dim VbComp, VbComps, code, t, i&, ok As Boolean, lasub, a, cl&, idx, pl&
    Set VbComps = ActiveWorkbook.VBProject.VBComponents
    content = "<menu xmlns=""http://schemas.microsoft.com/office/2006/01/customui"" >" & vbCrLf 'ouverture de la balise menu
    For Each VbComp In VbComps
         cl = VbComp.CodeModule.CountOfLines
       
        If cl > 0 Then
        code = VbComp.CodeModule.Lines(1, VbComp.CodeModule.CountOfLines)
        If Trim(code) <> "" Then
            pl = pl + 1: idx = "M" & Format(Date + pl, "yyyymmdd")
       a = a + 1
            content = content & "<menu id=""" & VbComp.Name & idx & a & Chr(34) & " label=""Module : " & VbComp.Name & """ >" & vbCrLf
            t = Split(code & vbCrLf, vbCrLf)
            For i = 1 To UBound(t)
                ok = False
                Select Case True
                    Case Left(Trim(t(i)), 4) = "Sub "
                        ok = True
                    Case Left(Trim(t(i)), 11) = "Private Sub "
                        ok = True
                    Case Left(Trim(t(i)), 11) = "Public Sub "
                        ok = True
                    Case Left(Trim(t(i)), 9) = "Function "
                        ok = True
                    Case Left(Trim(t(i)), 17) = "Private Function "
                        ok = True
                    Case Left(Trim(t(i)), 16) = "Public Function "
                        ok = True
                End Select
                If ok Then
                   lasub = Trim(Split(t(i), "(")(0))
                    content = content & "<button id=""B" & VbComp.Name & CLng(Date + i) & """ label=""" & lasub & """ imageMso=""MailMergeGreetingLineInsert"" onAction=""ExporteLaSub"""
                    content = content & " tag=""" & VbComp.Name & "|" & lasub & """ />" & vbCrLf
                End If
            Next
        content = content & "</menu>" & vbCrLf
 End If
     End If
   Next
    DoEvents
    content = content & "</menu>"
    Debug.Print content
End Sub
et là ta liste de module et macro fonctionne
Regarde la pièce jointe 1219871
voici le menu qui est créé
XML:
</menu>
<menu id="MAIL_OUTLOOKM2025073132" label="Module : MAIL_OUTLOOK" >
</menu>
<menu id="MxgBox_PositionnéM2025080133" label="Module : MxgBox_Positionné" >
<button id="BMxgBox_Positionné45888" label="Function MsgBoxPos" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Function MsgBoxPos" />
<button id="BMxgBox_Positionné45895" label="Sub repositionneMsgbox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Sub repositionneMsgbox" />
</menu>
<menu id="cOutlookDataM2025080234" label="Module : cOutlookData" >
<button id="BcOutlookData45923" label="Public Sub SetTabEmbbededImages" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabEmbbededImages" />
<button id="BcOutlookData45939" label="Public Sub SetTabAttachments" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabAttachments" />
<button id="BcOutlookData45959" label="Public Function GetAttachment" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Function GetAttachment" />
<button id="BcOutlookData45978" label="Private Function IsArrayInitialized" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Private Function IsArrayInitialized" />
</menu>
<menu id="Module_OUTLOOK_APIM2025080335" label="Module : Module_OUTLOOK_API" >
<button id="BModule_OUTLOOK_API45839" label="Public Function GetOutlookAccountObject" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function GetOutlookAccountObject" />
<button id="BModule_OUTLOOK_API45853" label="Public Function ListeComptesOutlook" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function ListeComptesOutlook" />
</menu>
<menu id="UserForm_SaisieObjetM2025080436" label="Module : UserForm_SaisieObjet" >
<button id="BUserForm_SaisieObjet45841" label="Public Function ShowModalAndReturnSujet" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="UserForm_SaisieObjet|Public Function ShowModalAndReturnSujet" />
</menu><menu xmlns="http://schemas.microsoft.com/office/2006/01/customui" >
<menu id="ThisWorkbookM202506301" label="Module : ThisWorkbook" >
</menu>
<menu id="Feuil1M202507012" label="Module : Feuil1" >
<button id="BFeuil145866" label="Sub ComparerNombresDossiers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Feuil1|Sub ComparerNombresDossiers" />
</menu>
<menu id="Feuil2M202507023" label="Module : Feuil2" >
<button id="BFeuil245866" label="Sub ComparerNombresDossiers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Feuil2|Sub ComparerNombresDossiers" />
</menu>
<menu id="Feuil3M202507034" label="Module : Feuil3" >
</menu>
<menu id="Z_FUNCTION_IS_LOADEDM202507045" label="Module : Z_FUNCTION_IS_LOADED" >
</menu>
<menu id="MENUM202507056" label="Module : MENU" >
<button id="BMENU45843" label="Sub Fiche_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Fiche_AfficherFeuilleEtUserForm" />
<button id="BMENU45850" label="Sub Saisie_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Saisie_AfficherFeuilleEtUserForm" />
<button id="BMENU45857" label="Sub Travaux_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub Travaux_AfficherFeuilleEtUserForm" />
<button id="BMENU45864" label="Sub PVAG_AfficherFeuilleEtUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub PVAG_AfficherFeuilleEtUserForm" />
<button id="BMENU45931" label="Sub alimentation_COMBOBOX_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MENU|Sub alimentation_COMBOBOX_CLIENT" />
</menu>
<menu id="USF_SAISIEM202507067" label="Module : USF_SAISIE" >
<button id="BUSF_SAISIE45839" label="Sub Controle_CHECKBOX_Saisie" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Controle_CHECKBOX_Saisie" />
<button id="BUSF_SAISIE45849" label="Sub Controle_CHECKBOX_Verif" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Controle_CHECKBOX_Verif" />
<button id="BUSF_SAISIE47340" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="BUSF_SAISIE47358" label="Sub Init_CheckBox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub Init_CheckBox" />
<button id="BUSF_SAISIE47384" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_INFO_CLIENT" />
<button id="BUSF_SAISIE47481" label="Sub MAJ_STATISTIQUE" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_STATISTIQUE" />
<button id="BUSF_SAISIE47501" label="Sub MAJ_DATE" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_SAISIE|Sub MAJ_DATE" />
</menu>
<menu id="DIVERSM202507078" label="Module : DIVERS" >
<button id="BDIVERS45839" label="Sub lance_usf_suivi_saisie_compta" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_saisie_compta" />
<button id="BDIVERS45843" label="Sub lance_usf_suivi_travaux_annuel" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_travaux_annuel" />
<button id="BDIVERS45847" label="Sub lance_usf_suivi_PVAG" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_suivi_PVAG" />
<button id="BDIVERS45851" label="Sub lance_Menu" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_Menu" />
<button id="BDIVERS45855" label="Sub lance_usf_fiche_client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub lance_usf_fiche_client" />
<button id="BDIVERS45859" label="Sub OuvrirStatistique" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub OuvrirStatistique" />
<button id="BDIVERS45863" label="Sub RETOUR_FEUILLE_FICHE_Cliquer" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub RETOUR_FEUILLE_FICHE_Cliquer" />
<button id="BDIVERS45867" label="Sub Envoi_Outlook" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Envoi_Outlook" />
<button id="BDIVERS45871" label="Function FormatSIRET" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Function FormatSIRET" />
<button id="BDIVERS45879" label="Sub ListerNomsGestionnaire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerNomsGestionnaire" />
<button id="BDIVERS45900" label="Sub ListerTextBoxComboBox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerTextBoxComboBox" />
<button id="BDIVERS45924" label="Sub ListerElementsUserForm" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub ListerElementsUserForm" />
<button id="BDIVERS45950" label="Sub Sortie_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Sortie_Dossier" />
<button id="BDIVERS46037" label="Sub Entree_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="DIVERS|Sub Entree_Dossier" />
</menu>
<menu id="CALENDARM202507089" label="Module : CALENDAR" >
<button id="BCALENDAR45876" label="Public Function ShowX" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function ShowX" />
<button id="BCALENDAR45906" label="Public Function Showcenter" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function Showcenter" />
<button id="BCALENDAR45926" label="Public Function ShowTopLeft" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Function ShowTopLeft" />
<button id="BCALENDAR45990" label="Sub Config" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Sub Config" />
<button id="BCALENDAR46073" label="Public Sub ReloadClavier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Public Sub ReloadClavier" />
<button id="BCALENDAR46114" label="Private Function placementRange" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function placementRange" />
<button id="BCALENDAR46144" label="Private Function placementActivXsheets" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function placementActivXsheets" />
<button id="BCALENDAR46164" label="Private Function férié" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="CALENDAR|Private Function férié" />
</menu>
<menu id="USF_TRAVAUXM2025070910" label="Module : USF_TRAVAUX" >
<button id="BUSF_TRAVAUX46060" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="BUSF_TRAVAUX46078" label="Sub Suivant_Nom_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Suivant_Nom_Client" />
<button id="BUSF_TRAVAUX46088" label="Sub Precedent_Nom_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Precedent_Nom_Client" />
<button id="BUSF_TRAVAUX46111" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub MAJ_INFO_CLIENT" />
<button id="BUSF_TRAVAUX46227" label="Sub demande_Fermeture_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub demande_Fermeture_Dossier" />
<button id="BUSF_TRAVAUX46244" label="Sub Blocage_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Blocage_Dossier" />
<button id="BUSF_TRAVAUX46301" label="Sub Deblocage_Dossier" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub Deblocage_Dossier" />
<button id="BUSF_TRAVAUX46383" label="Sub MAJ_STATISTIQUES" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub MAJ_STATISTIQUES" />
<button id="BUSF_TRAVAUX46416" label="Sub VERIF_CHECKB" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub VERIF_CHECKB" />
<button id="BUSF_TRAVAUX46594" label="Sub dossier_verrouille" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub dossier_verrouille" />
<button id="BUSF_TRAVAUX46622" label="Sub dossier_deverrouille" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TRAVAUX|Sub dossier_deverrouille" />
</menu>
<menu id="Feuil4M2025071011" label="Module : Feuil4" >
</menu>
<menu id="USF_FICHE_CLIENTM2025071112" label="Module : USF_FICHE_CLIENT" >
<button id="BUSF_FICHE_CLIENT45921" label="Sub RemplirPrenomNomDirigeant" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub RemplirPrenomNomDirigeant" />
<button id="BUSF_FICHE_CLIENT45993" label="Function EmailValide" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Function EmailValide" />
<button id="BUSF_FICHE_CLIENT46105" label="Function fctNumeric14Digits" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Function fctNumeric14Digits" />
<button id="BUSF_FICHE_CLIENT46114" label="Public Function verifSiret" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Public Function verifSiret" />
<button id="BUSF_FICHE_CLIENT46238" label="Sub OB_CREATION_Click" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub OB_CREATION_Click" />
<button id="BUSF_FICHE_CLIENT46252" label="Sub Initialisation_Usf_Fiche_Client" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub Initialisation_Usf_Fiche_Client" />
<button id="BUSF_FICHE_CLIENT46344" label="Sub alimentation_COMBOBOX_FICHE_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub alimentation_COMBOBOX_FICHE_CLIENT" />
<button id="BUSF_FICHE_CLIENT46364" label="Sub DerniereCelluleTexteRougeEtInscrire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub DerniereCelluleTexteRougeEtInscrire" />
<button id="BUSF_FICHE_CLIENT46584" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub MAJ_INFO_CLIENT" />
<button id="BUSF_FICHE_CLIENT46650" label="Sub TrierTableaux" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_FICHE_CLIENT|Sub TrierTableaux" />
</menu>
<menu id="Feuil11M2025071213" label="Module : Feuil11" >
</menu>
<menu id="USF_RECH_SUPP_DOSSIERM2025071314" label="Module : USF_RECH_SUPP_DOSSIER" >
</menu>
<menu id="USF_PVAGM2025071415" label="Module : USF_PVAG" >
<button id="BUSF_PVAG46032" label="Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub alimentation_COMBOBOX_SAISIE_NOM_CLIENT" />
<button id="BUSF_PVAG46061" label="Sub MAJ_INFO_CLIENT" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub MAJ_INFO_CLIENT" />
<button id="BUSF_PVAG46091" label="Sub MAJ_STATISTIQUES" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub MAJ_STATISTIQUES" />
<button id="BUSF_PVAG46123" label="Sub VERIF_CHECKB" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_PVAG|Sub VERIF_CHECKB" />
</menu>
<menu id="USF_TABLEAU_FICHEM2025071516" label="Module : USF_TABLEAU_FICHE" >
<button id="BUSF_TABLEAU_FICHE45871" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_FICHE|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_SAISIEM2025071617" label="Module : USF_TABLEAU_SAISIE" >
<button id="BUSF_TABLEAU_SAISIE45870" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_SAISIE|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_TRAVAUXM2025071718" label="Module : USF_TABLEAU_TRAVAUX" >
<button id="BUSF_TABLEAU_TRAVAUX45870" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_TRAVAUX|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_TABLEAU_PVAGM2025071819" label="Module : USF_TABLEAU_PVAG" >
<button id="BUSF_TABLEAU_PVAG45870" label="Sub AfficherColonnesDansListBox1" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_TABLEAU_PVAG|Sub AfficherColonnesDansListBox1" />
</menu>
<menu id="USF_STATISTIQUEM2025071920" label="Module : USF_STATISTIQUE" >
<button id="BUSF_STATISTIQUE45866" label="Sub OuvrirStatistique" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub OuvrirStatistique" />
<button id="BUSF_STATISTIQUE45870" label="Sub Infos_Statistiques" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub Infos_Statistiques" />
<button id="BUSF_STATISTIQUE45909" label="Sub DerniereCelluleTexteRougeEtInscrire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="USF_STATISTIQUE|Sub DerniereCelluleTexteRougeEtInscrire" />
</menu>
<menu id="Feuil5M2025072021" label="Module : Feuil5" >
</menu>
<menu id="Feuil12M2025072122" label="Module : Feuil12" >
</menu>
<menu id="Feuil6M2025072223" label="Module : Feuil6" >
</menu>
<menu id="JsonConverterM2025072324" label="Module : JsonConverter" >
<button id="BJsonConverter46007" label="Public Function ParseJson" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseJson" />
<button id="BJsonConverter46034" label="Public Function ConvertToJson" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToJson" />
<button id="BJsonConverter46296" label="Private Function json_ParseObject" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseObject" />
<button id="BJsonConverter46328" label="Private Function json_ParseArray" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseArray" />
<button id="BJsonConverter46352" label="Private Function json_ParseValue" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseValue" />
<button id="BJsonConverter46379" label="Private Function json_ParseString" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseString" />
<button id="BJsonConverter46439" label="Private Function json_ParseNumber" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseNumber" />
<button id="BJsonConverter46472" label="Private Function json_ParseKey" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseKey" />
<button id="BJsonConverter46500" label="Private Function json_IsUndefined" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_IsUndefined" />
<button id="BJsonConverter46513" label="Private Function json_Encode" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_Encode" />
<button id="BJsonConverter46574" label="Private Function json_Peek" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_Peek" />
<button id="BJsonConverter46587" label="Private Function json_StringIsLargeNumber" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_StringIsLargeNumber" />
<button id="BJsonConverter46615" label="Private Function json_ParseErrorMessage" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_ParseErrorMessage" />
<button id="BJsonConverter46691" label="Private Function json_BufferToString" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function json_BufferToString" />
<button id="BJsonConverter46728" label="Public Function ParseUtc" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseUtc" />
<button id="BJsonConverter46757" label="Public Function ConvertToUtc" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToUtc" />
<button id="BJsonConverter46786" label="Public Function ParseIso" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ParseIso" />
<button id="BJsonConverter46864" label="Public Function ConvertToIso" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Public Function ConvertToIso" />
<button id="BJsonConverter46881" label="Private Function utc_ConvertDate" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_ConvertDate" />
<button id="BJsonConverter46912" label="Private Function utc_ExecuteInShell" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_ExecuteInShell" />
<button id="BJsonConverter46943" label="Private Function utc_DateToSystemTime" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_DateToSystemTime" />
<button id="BJsonConverter46953" label="Private Function utc_SystemTimeToDate" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="JsonConverter|Private Function utc_SystemTimeToDate" />
</menu>
<menu id="Z_FUNCTION_JSONM2025072425" label="Module : Z_FUNCTION_JSON" >
</menu>
<menu id="Z_FUNCTION_PAPPERSM2025072526" label="Module : Z_FUNCTION_PAPPERS" >
<button id="BZ_FUNCTION_PAPPERS45842" label="Function Extraction_champ" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Z_FUNCTION_PAPPERS|Function Extraction_champ" />
<button id="BZ_FUNCTION_PAPPERS45879" label="Sub Rapatrie_Infos_Pappers" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Z_FUNCTION_PAPPERS|Sub Rapatrie_Infos_Pappers" />
</menu>
<menu id="Feuil7M2025072627" label="Module : Feuil7" >
</menu>
<menu id="Feuil8M2025072728" label="Module : Feuil8" >
</menu>
<menu id="COPY_INFO_SIRENM2025072829" label="Module : COPY_INFO_SIREN" >
<button id="BCOPY_INFO_SIREN45839" label="Sub CopierDonneesSirenEtMettreAJourSommaire" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="COPY_INFO_SIREN|Sub CopierDonneesSirenEtMettreAJourSommaire" />
<button id="BCOPY_INFO_SIREN45925" label="Sub MettreAJourSommaireInteractif" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="COPY_INFO_SIREN|Sub MettreAJourSommaireInteractif" />
</menu>
<menu id="LISTE_FEUILLE_FICHEM2025072930" label="Module : LISTE_FEUILLE_FICHE" >
<button id="BLISTE_FEUILLE_FICHE45839" label="Sub CreerListeValidationDepuisFICHE_SIREN" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="LISTE_FEUILLE_FICHE|Sub CreerListeValidationDepuisFICHE_SIREN" />
</menu>
<menu id="FICHE_PAPPERSM2025073031" label="Module : FICHE_PAPPERS" >
</menu>
<menu id="MAIL_OUTLOOKM2025073132" label="Module : MAIL_OUTLOOK" >
</menu>
<menu id="MxgBox_PositionnéM2025080133" label="Module : MxgBox_Positionné" >
<button id="BMxgBox_Positionné45888" label="Function MsgBoxPos" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Function MsgBoxPos" />
<button id="BMxgBox_Positionné45895" label="Sub repositionneMsgbox" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="MxgBox_Positionné|Sub repositionneMsgbox" />
</menu>
<menu id="cOutlookDataM2025080234" label="Module : cOutlookData" >
<button id="BcOutlookData45923" label="Public Sub SetTabEmbbededImages" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabEmbbededImages" />
<button id="BcOutlookData45939" label="Public Sub SetTabAttachments" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Sub SetTabAttachments" />
<button id="BcOutlookData45959" label="Public Function GetAttachment" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Public Function GetAttachment" />
<button id="BcOutlookData45978" label="Private Function IsArrayInitialized" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="cOutlookData|Private Function IsArrayInitialized" />
</menu>
<menu id="Module_OUTLOOK_APIM2025080335" label="Module : Module_OUTLOOK_API" >
<button id="BModule_OUTLOOK_API45839" label="Public Function GetOutlookAccountObject" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function GetOutlookAccountObject" />
<button id="BModule_OUTLOOK_API45853" label="Public Function ListeComptesOutlook" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="Module_OUTLOOK_API|Public Function ListeComptesOutlook" />
</menu>
<menu id="UserForm_SaisieObjetM2025080436" label="Module : UserForm_SaisieObjet" >
<button id="BUserForm_SaisieObjet45841" label="Public Function ShowModalAndReturnSujet" imageMso="MailMergeGreetingLineInsert" onAction="ExporteLaSub" tag="UserForm_SaisieObjet|Public Function ShowModalAndReturnSujet" />
</menu>
</menu>

</menu>
il ne pourra plus avoir d'ambiguité sur un Id pour menu/bouton
Patrick, je ne maitrise pas trop le xlm, pourrais tu me guider pour modifier mon fichier stp
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour