Bonsoir,
pour supprimer des boutons dans l'onglet "complément", déroule ce code :
Sub SupMenuComplement()
Application.CommandBars("le_nom_de_ta_barre_d'outils").Delete
End Sub
où tu remplaces "le_nom_de_ta_barre_d'outils" par le nom réel..
Attention aux espaces, _ et autres tirets
pour avoir la liste de tes barres d'outils, déroule ce code dans un nouveau classeur :
Sub liste_commandbar()
i = 1
For Each ct In Application.CommandBars
Cells(i, 1).Value = ct.Name
i = i + 1
Next ct
End Sub
tu auras ainsi tous les noms des barres d'outils, et copie le nom de la barre d'outils que tu veux supprimer dans le 1er code...
Bonne soirée