Ribbon XML Editor создание вкладок

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Ribbon XML Editor создание вкладок (Макросы/Sub)

lebensvoll

Дата: Среда, 28.09.2016, 13:54 | Сообщение № 1

Группа: Проверенные

Ранг: Старожил

Сообщений: 1002

Репутация: 30 ±

Замечаний: 0% ±

Excel 2010

прошу прощение и тем что досаждаю

Но вновь вынужден обратиться к вам за помощью.
Подскажите, помогите, как в Ribbon XML Editor создать не одну вкладку (свою) а несколько. В данном коде у меня получается создать одну вкладку а в ней несколько разделов.
Можно ли создать две вкладки???

[vba]

Код

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
    <ribbon startFromScratch="false">
  <tabs>
   <tab id="vr_01" label="Диспетчерезация">
    <group id="gr_01" label="Подтверждение заявок для УПТК">
     <button id="start1" label="Добавить запись" size="large" onAction="start1" imageMso="RecordInJournal" />
     <button id="start2" label="Редактировать" size="large" onAction="start2" imageMso="EditCitation" />
     <button id="start3" label="Создать копию" size="large" onAction="start3" imageMso="CopyPicture" />
     <button id="start4" label="Сохранить" size="large" onAction="start4" imageMso="BuildingBlocksSaveTableOfContents"/>
     <button id="start5" label="Перейти на лист" size="large" onAction="start5" imageMso="BackAttach"/>
     <button id="start6" label="Отправить по почте" size="large" onAction="start6" imageMso="EmailMergeStart"/>
    </group>
    <group id="gr_02" label="План Факт по заявкам">
     <button id="start7" label="Добавить запись" size="large" onAction="start1" imageMso="RecordInJournal" />
     <button id="start8" label="Редактировать" size="large" onAction="start2" imageMso="EditCitation" />
     <button id="start9" label="Создать копию" size="large" onAction="start3" imageMso="CopyPicture" />
     <button id="start10" label="Сохранить" size="large" onAction="start4" imageMso="BuildingBlocksSaveTableOfContents"/>
     <button id="start11" label="Перейти на лист" size="large" onAction="start5" imageMso="BackAttach"/>
    </group>
   </tab>
  </tabs>
    </ribbon>
</customUI>

[/vba]

Прошу вас помогите. Я хочу изменить саму ленту "ribbon startFromScratch="false"" и скрыть ее вообще с глаз долой "true" но при этом будут видны лишь вкладки которые создам с разделами...

прошу прощение и тем что досаждаю

Код

Кто бы ты ни был, мир в твоих руках

Ответить

Сообщениепрошу прощение и тем что досаждаю

Код

Автор - lebensvoll
Дата добавления - 28.09.2016 в 13:54

lebensvoll

Дата: Среда, 28.09.2016, 14:02 | Сообщение № 2

Группа: Проверенные

Ранг: Старожил

Сообщений: 1002

Репутация: 30 ±

Замечаний: 0% ±

Excel 2010

1 вкладка Подтверждение заявок для УПТК
2-я вкладка План факт по заявкам
3-я и т.д
А в этих вкладках будут определенные кнопки с командами
Как бы вот так вот. Но как только я начинаю создавать новую вкладку вот так вот
customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui"
то он ругается (((( а как правильно сделать

Ответить

buchlotnik

Дата: Среда, 28.09.2016, 14:06 | Сообщение № 3

Группа: Заблокированные

Ранг: Участник клуба

Сообщений: 3442

Репутация: 929 ±

Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG

Цитата

Можно ли создать две вкладки???

Можно сколько влезет:
[vba]

Код

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
    <ribbon startFromScratch="false">
<tabs>
<tab id="vr_01" label="Диспетчерезация">
  ...ваш код
</tab>
<tab id="vr_02" label="Что-то ещё">
  ...ваш код
</tab>
<tab id="vr_03" label="И т.д.">
  ...ваш код
</tab>
</tabs>
    </ribbon>
</customUI>

[/vba]

Ответить

lebensvoll

Дата: Среда, 28.09.2016, 15:52 | Сообщение № 4

Группа: Проверенные

Ранг: Старожил

Сообщений: 1002

Репутация: 30 ±

Замечаний: 0% ±

Excel 2010

buchlotnik, спасибо огромное я вроде бы справился (((( но это жесть как сложно и долго столько всего пересмотрели с парнями в инете
у меня вот так вот получается
[vba]

Код

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
    <ribbon startFromScratch="false">
  <tabs>
   <tab id="vr_01" label="Подтверждение заявок для УПТК">
    <group id="gr_01" label="Подтверждение заявок для УПТК">
     <button id="start1" label="Добавить запись" size="large" onAction="start1" imageMso="RecordInJournal" />
     <button id="start2" label="Редактировать" size="large" onAction="start2" imageMso="EditCitation" />
     <button id="start3" label="Создать копию" size="large" onAction="start3" imageMso="CopyPicture" />
     <button id="start4" label="Сохранить" size="large" onAction="start4" imageMso="BuildingBlocksSaveTableOfContents"/>
     <button id="start5" label="Перейти на лист" size="large" onAction="start5" imageMso="BackAttach"/>
     <button id="start6" label="Отправить по почте" size="large" onAction="start6" imageMso="EmailMergeStart"/>
    </group>
   </tab>
   <tab id="vr_02" label="План факт по заявкам">
     <group id="gr_02" label="План Факт по заявкам">
     <button id="start7" label="Добавить запись" size="large" onAction="start7" imageMso="RecordInJournal" />
     <button id="start8" label="Редактировать" size="large" onAction="start8" imageMso="EditCitation" />
     <button id="start9" label="Создать копию" size="large" onAction="start9" imageMso="CopyPicture" />
     <button id="start10" label="Сохранить" size="large" onAction="start10" imageMso="BuildingBlocksSaveTableOfContents"/>
     <button id="start11" label="Перейти на лист" size="large" onAction="start11" imageMso="BackAttach"/>

    </group>
   </tab>
  </tabs>
    </ribbon>
</customUI>

[/vba]

Код

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
    <ribbon startFromScratch="false">
  <tabs>
   <tab id="vr_01" label="Подтверждение заявок для УПТК">
    <group id="gr_01" label="Подтверждение заявок для УПТК">
     <button id="start1" label="Добавить запись" size="large" onAction="start1" imageMso="RecordInJournal" />
     <button id="start2" label="Редактировать" size="large" onAction="start2" imageMso="EditCitation" />
     <button id="start3" label="Создать копию" size="large" onAction="start3" imageMso="CopyPicture" />
     <button id="start4" label="Сохранить" size="large" onAction="start4" imageMso="BuildingBlocksSaveTableOfContents"/>
     <button id="start5" label="Перейти на лист" size="large" onAction="start5" imageMso="BackAttach"/>
     <button id="start6" label="Отправить по почте" size="large" onAction="start6" imageMso="EmailMergeStart"/>
    </group>
   </tab>
   <tab id="vr_02" label="План факт по заявкам">
     <group id="gr_02" label="План Факт по заявкам">
     <button id="start7" label="Добавить запись" size="large" onAction="start7" imageMso="RecordInJournal" />
     <button id="start8" label="Редактировать" size="large" onAction="start8" imageMso="EditCitation" />
     <button id="start9" label="Создать копию" size="large" onAction="start9" imageMso="CopyPicture" />
     <button id="start10" label="Сохранить" size="large" onAction="start10" imageMso="BuildingBlocksSaveTableOfContents"/>
     <button id="start11" label="Перейти на лист" size="large" onAction="start11" imageMso="BackAttach"/>

    </group>
   </tab>
  </tabs>
    </ribbon>
</customUI>

[/vba]lebensvoll

Кто бы ты ни был, мир в твоих руках

Ответить

Сообщениеbuchlotnik, спасибо огромное я вроде бы справился (((( но это жесть как сложно и долго столько всего пересмотрели с парнями в инете
у меня вот так вот получается
[vba]

Код

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
    <ribbon startFromScratch="false">
  <tabs>
   <tab id="vr_01" label="Подтверждение заявок для УПТК">
    <group id="gr_01" label="Подтверждение заявок для УПТК">
     <button id="start1" label="Добавить запись" size="large" onAction="start1" imageMso="RecordInJournal" />
     <button id="start2" label="Редактировать" size="large" onAction="start2" imageMso="EditCitation" />
     <button id="start3" label="Создать копию" size="large" onAction="start3" imageMso="CopyPicture" />
     <button id="start4" label="Сохранить" size="large" onAction="start4" imageMso="BuildingBlocksSaveTableOfContents"/>
     <button id="start5" label="Перейти на лист" size="large" onAction="start5" imageMso="BackAttach"/>
     <button id="start6" label="Отправить по почте" size="large" onAction="start6" imageMso="EmailMergeStart"/>
    </group>
   </tab>
   <tab id="vr_02" label="План факт по заявкам">
     <group id="gr_02" label="План Факт по заявкам">
     <button id="start7" label="Добавить запись" size="large" onAction="start7" imageMso="RecordInJournal" />
     <button id="start8" label="Редактировать" size="large" onAction="start8" imageMso="EditCitation" />
     <button id="start9" label="Создать копию" size="large" onAction="start9" imageMso="CopyPicture" />
     <button id="start10" label="Сохранить" size="large" onAction="start10" imageMso="BuildingBlocksSaveTableOfContents"/>
     <button id="start11" label="Перейти на лист" size="large" onAction="start11" imageMso="BackAttach"/>

    </group>
   </tab>
  </tabs>
    </ribbon>
</customUI>

[/vba]

Автор - lebensvoll
Дата добавления - 28.09.2016 в 15:52

lebensvoll

Дата: Среда, 28.09.2016, 15:55 | Сообщение № 5

Группа: Проверенные

Ранг: Старожил

Сообщений: 1002

Репутация: 30 ±

Замечаний: 0% ±

Excel 2010

buchlotnik, простите если обременил.
И еще раз СПАСИБО и за програмку и за помощь и за подзотыльники.
ПРОШУ ВАС НЕ ОГОРЧАЙТЕСЬ на меня я только учусь (и учусь странным образом, согласен) но все же учусь ))))).
СПАСИБО ВСЕМ И СОЗДАТЕЛЯМ САЙТА hands