bonjour
j'ai ajouté dans les complements une liste de 33 items avec le code suivant
ce code fonctionne parfaitement
la seule chose c'est que j'obtiens une liste de 33 lignes
je voudrais savoir s'il existe une possibilité d"avoir cette liste sous forme de tableau (par ex. au lieu de 33 lignes 4 colonnes et 10 lignes)

merci d'avance de votre réponse
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Set maBarp = Application.CommandBars("Worksheet Menu Bar").Controls.Add(msoControlPopup, , , , True)
maBarp.TooltipText = "Poules"
maBarp.Caption = "Poules"
For Z = 1 To 33
With maBarp.Controls.Add(msoControlButton)
.Caption = "Poules_" & Z
.OnAction = "'ppoules " & Z & "'"
.FaceId = 49 '49=?
End With
Next