Souci sur la création de commandbar avec faceid
Salut les vbites.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
| Set men2 = NewMenu.Controls.Add(msoControlPopup, , , , True)
With men2
.Caption = "classement"
End With
Set men2opt1 = men2.Controls.Add(msoControlButton, , , , True)
With men2opt1
.FaceId = 3872
.Caption = "Pertes"
.OnAction = "Start"
End With
Set men2opt2 = men2.Controls.Add(msoControlButton, , , , True)
With men2opt2
.FaceId = 3873
.Caption = "Profits"
.OnAction = "star"
End With |
Voila mon code
Le probleme est le suivant: je cherche à ajouter un faceid au menu men2 seulement j'ai tester plusieurs méthode et à chaques fois c'est erreur 438 ou 5 c'est la misere. Si quelqu'un connait ce genre de chose je suis preneur ,j'ai dut zapper un parametre.
Cordialement JZV
