Картинка в меню...

Получается какой-то глюк при вставке картинки в меню.
Хочу сделать меню, в котором надписи были бы с картинками. При обычной настройке меню выбор
картинок невелик - я хочу вставить свою, нету нигде выбора картинок.
Теперь я формирую панель меню из VBA. Сначала картинки отображались нормально, а потом почему то стали "съеживаться".
Вот код:
Dim pop As Office.CommandBarPopup
Dim btn As Office.CommandBarButton

Set pop = Application.CommandBars.Item("MyMenu").Controls.Add(msoControlPopup)
With pop
.Caption = "Документы"
.Tag = "UserMenu"
.BeginGroup = True
End With
Set btn = pop.Controls.Add(msoControlButton)
With btn
.Caption = "Приходы"
.Tag = "UserMenu"
.OnAction = "OpenMainListing"
.Picture = stdole.StdFunctions.LoadPicture("D:\icons\DocComTT.bmp")
End With
Set btn = pop.Controls.Add(msoControlButton)
With btn
.Caption = "Расход"
.Tag = "UserMenu"
.Picture = stdole.StdFunctions.LoadPicture("D:\icons\DocOff.bmp")
'.OnAction = "OpenMainListing"
End With

а вот то что получается:

красным выделено нормальная картинка, а желтым "съежившаяся"

а картинки-то одинаковые? Пример можно увидеть (хотя бы картинок)?
А что вы их в таблицу или в ImageList не засуните?

Вроде разобрался: картинка должна быть максимум 16х16, у меня было больше.