Comment déclarer ma variable

[GeoTrouvePas]

Bonsoir tout le monde,

Je viens de me créer une petite boucle qui supprime un petit menu personnalisé :

Sub Suppr_Menu()
    For Each Barre In Application.CommandBars("Worksheet Menu Bar").Controls
        If Barre.Caption = "Perso" Then Barre.Delete
    Next
End Sub

Mon soucis est que je ne sais pas comment déclarer ma variable "Barre". Je bloque complet là.
Auriez vous une idée du type à utiliser ?

Je vous remercie par avance de votre aide !

Bonne soirée

 

[Dormeur74]

Re : Comment déclarer ma variable

As-tu essayé :

Dim Barre as Object

(sans garantie).

 

[Habitude]

Re : Comment déclarer ma variable

Bonjour

Dim barre As CommandBarControl

 

[GeoTrouvePas]

Re : Comment déclarer ma variable

Bonjour à vous trois ! (mais aussi à tous les autres !)

@Dormeur : j'avais déjà essayé beaucoup de choses mais je n'avais pas pensé à Object. Et ça semble fonctionner. Merci !

@Carcharodon : un grand merci pour ce lien que je n'avais pas encore découvert. Il semble contenir de précieuses infos.

@Habitude : j'avais tenté CommandBar, Control, Controls, CommandBar.Control mais pas CommandBarControl. Ça semble également fonctionner. Merci !

Je vous remercie tous les trois pour votre aide et vous souhaite une bonne journée !