powered by simpleCommunicator - 2.0.39     © 2025 Programmizd 02
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Пользовательская кнопка на ленте
11 сообщений из 11, страница 1 из 1
Пользовательская кнопка на ленте
    #39143017
Юра613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день.

Подскажите, пож-та, можно ли добавить на ленту пользовательскую кнопку, которая бы имела два состояния: "в зажатом состоянии" и "в незажатом состоянии". По аналогии с кнопкой "режим конструктора" на вкладке "разработчик".
...
Рейтинг: 0 / 0
Пользовательская кнопка на ленте
    #39143892
Фотография essbase.ru
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Юра613,
ну и вопрос !

Код: xml
1.
2.
 <toggleButton id="b_Connections" getLabel="getLabel"    onAction="p_Connections"   imageMso="ServerConnection"  getVisible="p_IsVisible"   />
	                        <button id="b_SaveSQL"  getLabel="getLabel"    onAction="p_SaveSQL" imageMso="FileSaveAs"  getEnabled="p_SQLgetEnabled" getVisible="p_SQLIsVisible"  />	



примеры исполльзования по ключевому слову toggleButton ищи в инете
...
Рейтинг: 0 / 0
Пользовательская кнопка на ленте
    #39143977
Юра613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Извините забыл указать.

А для VBA такого примера нет?
...
Рейтинг: 0 / 0
Пользовательская кнопка на ленте
    #39143978
Юра613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
И ленту настраиваю в Excel
...
Рейтинг: 0 / 0
Пользовательская кнопка на ленте
    #39143997
Фотография essbase.ru
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Юра613,
1) Нуачитесь задавать вопросы
2) Основы познаются из учебников а не из общения на форуме
...
Рейтинг: 0 / 0
Пользовательская кнопка на ленте
    #39144036
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Юра613А для VBA такого примера нет?А версию Excel указать не хотите? Потому как для разных версий и методы разные. Если версия до 2003, то придется выкручиваться с помощь обычной кнопки. Примерно так:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
Sub Add_CmBar()
    Call Remove_CmBar
    With Application.CommandBars.Add("test bar", temporary:=True)
        With .Controls.Add(1)
            .Caption = "Эмулируем ToggleButton"
            .Style = 2
            .OnAction = "Emulate_Toggle"
        End With
        .Visible = True
    End With
End Sub
Sub Emulate_Toggle()
    Dim bt As CommandBarButton
    Set bt = Application.CommandBars.ActionControl
    If bt.State = msoButtonDown Then
        bt.State = msoButtonUp
    Else
        bt.State = msoButtonDown
    End If
End Sub


Если 2007 и выше - то лучше все же через XML, там есть специальный элемент ToggleButton.
Подробнее про создание надстроек из VBA здесь - Как создать свою надстройку?
...
Рейтинг: 0 / 0
Пользовательская кнопка на ленте
    #39144068
Юра613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Друзья, еще раз извиняюсь за некоректно сформулированный вопрос.

Работаю в Эксель 2010, в котором кнопки на панель можно добавлять встроенными средствами. Не нашел в нете как посредоством VBA добавить кнопку с двумя режимами.

Спасибо за ссылки, добавил кнопку на ленту при помощи RibbonXMLEditor. Все работает! Спасибо!

Выпадающие списки по аналогии с со списком стилей шрифотов и размеров тоже в RibbonXMLEditor можно сделать?
...
Рейтинг: 0 / 0
Пользовательская кнопка на ленте
    #39144071
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Юра613,

да, все можно. Поэкспериментируйте с XML и все получится. Там это можно сделать при помощи menu и spinbutton, если не изменяет память.
...
Рейтинг: 0 / 0
Пользовательская кнопка на ленте
    #39145014
Фотография essbase.ru
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Юра613Работаю в Эксель 2010, в котором кнопки на панель можно добавлять встроенными средствами

VSTO from C#
нужно создать Addin .DLL
...
Рейтинг: 0 / 0
Пользовательская кнопка на ленте
    #39145018
Фотография essbase.ru
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Юра613Выпадающие списки по аналогии

Код: xml
1.
2.
3.
4.
5.
6.
 <dropDown id="mn_Env" getLabel="getLabel"    getSelectedItemID="p_getSelectedItemID"  sizeString="WW"  onAction="p_onAction">
 <item id="mn_Env0" label=" prd"/>
 <item id="mn_Env1" label=" uat"/>
 <item id="mn_Env2" label=" test"/>
  <item id="mn_Env3" label=" dev"/>
 </dropDown>  



Код: vbnet
1.
2.
3.
4.
5.
 Sub p_onAction  (vIRibbonControlID As String, ByVal vSelectedValue)
 

    Select Case vSelectedValue
    Case "mn_Env3"



Код: vbnet
1.
2.
3.
4.
Sub p_getSelectedItemID  (vIRibbonControl As IRibbonControl, ByRef itemID As Variant, Optional vOptional)
 
     Select Case vIRibbonContro.lID
        Case "mn_Env"
...
Рейтинг: 0 / 0
Пользовательская кнопка на ленте
    #39145022
Фотография essbase.ru
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
sorry

Код: vbnet
1.
 Sub p_onAction(vIRibbonControl As IRibbonControl, ByVal vSelectedValue, Optional vOptional)
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Пользовательская кнопка на ленте
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]