Hello,

I am writing a custom toolbar and I wish to assigne a picture to one of
the control button but my syntax doesn't work. It bugs on .Picture=

Could someone help ?


Set cb = Application.CommandBars.Add(Name:="ToolBar1", temporary:=True)


With cb
Set cbpop = .Controls.Add(Type:=msoControlButton, temporary:=True)
With cbpop
..Picture = LoadPicture("C:\STOCK
CONTROL\Data-Macro\ArrRedLeftPlain.bmp")
..OnAction = ThisWorkbook.Name & "!Macro_Vide"
End With
End With

Cheers
Francois


--
micmacuk
------------------------------------------------------------------------
micmacuk's Profile: http://www.excelforum.com/member.php...o&userid=33253
View this thread: http://www.excelforum.com/showthread...hreadid=546771