Событие Workbook_SheetBeforeRightClick для PERSONAL.XLSB

@PowerCat · Регистрация: 19.09.2013

Студворк — интернет-сервис помощи студентам

Что за подстава с этими событиями в VBA...

Событие Workbook_SheetBeforeRightClick - все работает как хотел, но для единичного файла Excel.

Перекидываю все модули, формы и код в личную книгу макросов - и херак - не пашет это событие (( для любого файла(((

@Hugo121 · 09.10.2015, 12:02

Поищите код со строкой app_Workbook...

@Казанский · 09.10.2015, 12:07

PowerCat, все в порядке. Если Вы хотите отслеживать событие любого открытого файла, нужно подниматься на уровень приложения. В модуле ЭтаКнига PERSONAL.XLSB напишите

Visual Basic
1
2
3
4
5
Dim WithEvents app As Application
 
Private Sub Workbook_Open()
  Set app = Application
End Sub

Теперь в левом выпадающем списке над кодом выберите app, в правом выпадающем списке - SheetBeforeRightClick и получайте заготовку обработчика.
Чтобы все заработало немедленно, запустите Private Sub Workbook_Open().

@PowerCat · 09.10.2015, 12:34 **[ТС]**

Вы имели ввиду - в модуле класса, а не в модуле книги?

Добавлено через 9 минут
А, заработало...сам ступил...
Значит получается следующее:

Делаю app типом Application с отслеживанием событий
При открытии любой книги - инициализирую app
И далее уже получается, что обработчик готов к работе

Я правильно понял алгоритм этих действий?

@Казанский · 09.10.2015, 17:31

PowerCat, не совсем. При запуске Excel открывается PERSONAL, срабатывает Workbook_Open и app получает ссылку на Application. Теперь при возникновении события приложения вызывается соотв. обработчик app. Т.е. инициализация происходит один раз.

Новые блоги и статьи Все статьи Все блоги /
Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем

@PowerCat 0 / 2 / 1 Регистрация: 19.09.2013 Сообщений: 464

	Событие Workbook_SheetBeforeRightClick для PERSONAL.XLSB 09.10.2015, 11:44. Показов 1599. Ответов 4 Метки нет (Все метки) Что за подстава с этими событиями в VBA... Событие Workbook_SheetBeforeRightClick - все работает как хотел, но для единичного файла Excel. Перекидываю все модули, формы и код в личную книгу макросов - и херак - не пашет это событие (( для любого файла((( 0

@Hugo121 6998 / 2896 / 555 Регистрация: 19.10.2012 Сообщений: 8,804
	09.10.2015, 12:02
	Поищите код со строкой app_Workbook... 0

@PowerCat 0 / 2 / 1 Регистрация: 19.09.2013 Сообщений: 464
	09.10.2015, 12:34 [ТС]
	Вы имели ввиду - в модуле класса, а не в модуле книги? Добавлено через 9 минут А, заработало...сам ступил... Значит получается следующее: Делаю app типом Application с отслеживанием событий При открытии любой книги - инициализирую app И далее уже получается, что обработчик готов к работе Я правильно понял алгоритм этих действий? 0

@Казанский 15155 / 6428 / 1731 Регистрация: 24.09.2011 Сообщений: 9,999
	09.10.2015, 17:31
	PowerCat, не совсем. При запуске Excel открывается PERSONAL, срабатывает Workbook_Open и app получает ссылку на Application. Теперь при возникновении события приложения вызывается соотв. обработчик app. Т.е. инициализация происходит один раз. 0