Макросы для возвращения Идентификатора для элемента управления CommandBar

Переводы статьи Переводы статьи
Код статьи: 162814 - Vizualiza?i produsele pentru care se aplic? acest articol.
Развернуть все | Свернуть все

В этой статье

Аннотация

Свойство Id объекта CommandBar использует уникальный номер для каждого встроенную строку меню, контекстное меню, подменю, элемент меню или панель инструментов. Идентификатор часто необходим при ссылке на элемент управления в команде Линейчатая диаграмма. Вернуться в Visual Basic для приложений макроса примеры в этой статье Идентификатор для различных элементов управления Commandbar.

Дополнительная информация

Для получения дополнительных сведений щелкните следующий номер статьи для просмотра в статье базы знаний Майкрософт:
159466XL97: Список идентификаторов для элементов управления полосы встроенная команда

Корпорация Майкрософт предлагает примеры программного кода только для иллюстрации без гарантии или подразумеваемых. Это включает, но не ограничиваясь Чтобы подразумеваемые гарантии товарности или пригодности для определенной Цель. В данной статье предполагается, что вы знакомы с программированием язык, рассчитаны и с помощью средств, которые используются для создания и отладки. Сотрудники службы поддержки корпорации Майкрософт могут объяснить функциональные возможности конкретной процедуры, но они не изменит их Примеры расширения его функциональности или удовлетворения ваших особые требования.

В меню

В следующем примере макрос возвращает идентификатор для Сервис меню, встроенные – в строке меню диаграммы:
   Sub File_Id

      Dim x as Object
      set x = CommandBars("Chart Menu Bar").Controls("Tools")
      MsgBox x.Caption & Chr(13) & x.Id

   End Sub
				

Команда меню

В следующем примере макрос возвращает идентификатор команды Exit В меню Файл меню встроенную строку меню листа:
   Sub FileExit_Id()

      Dim x as Object
      set x = CommandBars("Worksheet Menu Bar").Controls("File") _
      .Controls("Exit")
      MsgBox x.Caption & Chr(13) & x.Id

   End Sub
				

Команды в подменю контекстного меню

В следующем примере макрос возвращает идентификатор для вычисляемых Элемент команды на Формулы подменю сводной таблицы контекстное меню:
   Sub SubMenu_Command_Id()

      Dim x as Object
      set x = CommandBars("PivotTable Context Menu").Controls("Formulas") _
      .Controls("Calculated Item...")
      MsgBox x.Caption & Chr(13) & x.Id

   End Sub
				
В следующем примере макрос возвращает идентификатор для всех элементов на Формулы, подменю панели меню сводной таблицы:
   Sub GetAll_Submenu_Ids()

      Dim ctrl as Object
      For Each ctrl in CommandBars("PivotTable Context Menu") _
      .Controls("Formulas").Controls
         MsgBox ctrl.Caption & Chr(13) & ctrl.Id
      Next ctrl

   End Sub
				

Ссылки

Для получения дополнительных сведений о настройке программными средствами панели команд, в редакторе Visual Basic, нажмите кнопку Microsoft Office Помощник, тип Настройка меню, нажмите кнопку Поиски нажмите кнопку Просмотр «Обзор панели команд».

Примечание Если помощник скрыт, щелкните Microsoft Office Помощник кнопки на панели инструментов Стандартная. Если Microsoft Visual Basic Справка не установлена на компьютере, обратитесь к следующей статье в База знаний корпорации Майкрософт:
120802 Office: Как добавлять и удалять одно приложение или компонент

Свойства

Код статьи: 162814 - Последний отзыв: 19 сентября 2011 г. - Revision: 5.0
Информация в данной статье относится к следующим продуктам.
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Excel 97 Standard Edition
Ключевые слова: 
kbhowto kbprogramming kbmt KB162814 KbMtru
Переведено с помощью машинного перевода
ВНИМАНИЕ! Перевод данной статьи был выполнен не человеком, а с помощью программы машинного перевода, разработанной корпорацией Майкрософт. Корпорация Майкрософт предлагает вам статьи, переведенные как людьми, так и средствами машинного перевода, чтобы у вас была возможность ознакомиться со статьями базы знаний KB на родном языке. Однако машинный перевод не всегда идеален. Он может содержать смысловые, синтаксические и грамматические ошибки, подобно тому как иностранец делает ошибки, пытаясь говорить на вашем языке. Корпорация Майкрософт не несет ответственности за неточности, ошибки и возможный ущерб, причиненный в результате неправильного перевода или его использования. Корпорация Майкрософт также часто обновляет средства машинного перевода.
Эта статья на английском языке:162814

Отправить отзыв

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com