VBA и разделитель меню

Tyrrhene · 20.12.2007, 20:54

Подскажите как на VBA вставить разрелитель в свое меню.

vburin · 20.12.2007, 22:09

обрати внимание на команду "...BeginGroup = True"
должен помочь сл. фрагмент кода:
Sub CreateCustomContextMenu()
With CommandBars.Add("MyContextMenu", msoBarPopup, , True).Controls
With .Add(msoControlButton)
.Caption = "test1"
.OnAction = "ShowFormatNumber"
End With
With .Add(msoControlButton)
.Caption = "test2"
.OnAction = "ShowFormatBorder"
.BeginGroup = True
End With
...
End Sub

20.12.2007, 20:54	#1
Tyrrhene Неактивный пользователь Пол: Регистрация: 01.01.2007 Сообщений: 64 Репутация: 18	VBA и разделитель меню Подскажите как на VBA вставить разрелитель в свое меню.

20.12.2007, 22:09	#2
vburin Неактивный пользователь Регистрация: 17.11.2007 Сообщений: 7 Репутация: 12	Ответ: VBA и разрелитель меню обрати внимание на команду "...BeginGroup = True" должен помочь сл. фрагмент кода: Sub CreateCustomContextMenu() With CommandBars.Add("MyContextMenu", msoBarPopup, , True).Controls With .Add(msoControlButton) .Caption = "test1" .OnAction = "ShowFormatNumber" End With With .Add(msoControlButton) .Caption = "test2" .OnAction = "ShowFormatBorder" .BeginGroup = True End With ... End Sub Последний раз редактировалось vburin; 20.12.2007 в 22:11.. Причина: повторная вставка примера кода из буфера обмена

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Исправить меню	MNZ	Скорая помощь	2	05.10.2009 12:27
Разделитель разрядов при вводе в ячейку DataGridView	fleming_7	.NET	0	08.05.2009 01:11
Меню	pitonka	Microsoft Windows	3	11.06.2008 22:09
Как изменить десятичный разделитель целой и дробной части	Sting	Вопросы и проблемы	1	04.03.2008 14:34