| Главная » Статьи » Надстройка |
Создаем кнопку в надстройке с помощью XML.
| Создаем кнопку, меню, группу кнопок. 1. Создаем файл AddIn1.xlam с модулем (Module1). Добавим в него процедуру: 'для кнопок на ленте необходимо указывать откуда она (...), при необходимости добавляем свойство нажатой кнопки (, pressed As Boolean)
Sub Ribbon_Button(control As IRibbonControl) MsgBox "IT WORKS!"
End Sub
2. Создаем блокнот с именем "customUI.txt" -> вставляем в него код ниже -> сохраняем в кодировке UTF-8 -> меняем формат .txt на .xml:
(Код XML "объяснит" экселю, где должна быть наша кнопка. Можно создавать выпадающие списки и т.п.)
<?xml version="1.0" encoding="UTF-8" standalone="yes"?> <customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui"> <ribbon> <tabs> <tab id="AddIn_1" label="AddIn1"> <!-- это название надстройки и её id --> <group id="Group_1" label="Group"> <!-- Создаем группу, при необходимости --> <!--onAction покажет путь к нашей процедуре | size лучше указывать small (normal, large) --> <button id="RibbonBtn_1" label="Кнопка_normal" size="normal" imageMso="BevelShapeGallery" onAction="VBAProject.Module1.Ribbon_Button" supertip="Всплывающая подсказка 1"/> <!-- Так можно делать выпадающий список кнопок --> <menu label="Выпадающий список" id = "menu1"> <button id="RibbonBtn_2" label="Nml" onAction="VBAProject.Module1.Ribbon_Button2" supertip="Всплывающая подсказка 2"/> <button id="RibbonBtn_23" label="Nml2" onAction="VBAProject.Module1.Ribbon_Button2" supertip="Всплывающая подсказка 2"/> </menu> </group> <!--еще одна группа с большой кнопкой. --> <group id="Group_2" label="Group2"> <button id="RibbonBtn_3" label="Кнопка_large" size="large" imageMso="BevelShapeGallery" onAction="VBAProject.Module1.Ribbon_Button3" supertip="Всплывающая подсказка 3"/> </group> </tab> </tabs> </ribbon> </customUI> 3. Создаем папку "customUI" -> переносим в неё файл "customUI.xml"
4. Меняем формат надстройки (.xlam) на .zip (или .rar) (или открываем с помощью архиватора) -> вынемаем из папки "_rels" файл ".rels" -> открываем как блокнот -> -> Между "><" вставляем код -> сохраняем и выходим:
<Relationship Id="customUI1" Type="http://schemas.microsoft.com/office/2006/relationships/ui/extensibility" Target="customUI/customUI.xml"/> 5. Измененный файл ".rels" вставляем в папку архива "_rels" + нашу папку "customUI" кидаем в корень архива -> меняем расширение архива обратно с ".zip" на ."xlam".
Тут можно выбрать себе картинку для кнопки http://soltechs.net/customui/imageMso01.asp?gal=9&count=no
Так же можно всталять разделители <separator id="separator_1"/>, текстовые поля <editBox label="text:" id="editBox_1" sizeString="XXXX" onChange="EditBox_1_Change"/> и т.п.
+ подписи к кнопке description="Returns..." | |
| Просмотров: 749 | | |
| Всего комментариев: 0 | |