Създаване на контекстното меню

Тази книга е предназначена за потребителите на Microsoft Excel и описва техниките и методите на работа, които, поради тяхната специфика, са по-слабо представени (или не е показан) в потребителския, справочници и други съответната документация. Изследването цитира примери в книгата ще позволи на читателя да открие неизвестни досега възможности на Excel. Предложеният материал е лесно смилаема, защото очертанията достъпен и разбираем език.

Книга: Excel. Каскади и ефекти

Създаване на контекстното меню

Раздели на тази страница:

В предишните глави ние разгледахме различни начини за формиране на потребителски менюта, които след това се показват в раздела Add-Ins. Тук ние се научите как да създадете контекстното меню.

Така че, нека да създадете потребителски контекстното меню със следните команди: Формат на числата, подравняване, шрифт, рамки, Модели и защита. С тези команди, на екрана ще се покаже прозорец за форматиране на клетките (също причинено чрез натискане на клавишната комбинация Ctrl + 1) със съответния отворен раздел. Създаден меню ще се нарича, като щракнете с десния бутон на мишката върху който и да е област от клетки A2: D5.

За да се реши този проблем, трябва да напише три кода: модул лист модул Тази книга е в стандартен модул.

Код, който трябва да бъде поставен в модула за работен лист е както следва (виж Обява 3.94).

Обявата 3.94. Кодът от лист модул

Под Worksheet_BeforeRightClick (ByVal Target As Excel.Range, _

Отмени Както Булева)

"Проверете дали избраната клетка в диапазона пада

Ако съюз (Target.Range ( «А1»), Range ( «A2: D5»)) Адрес = _.

"Показване на контекстното меню

След това, модулът Тази книга е необходимо да се постави кода в Обява 3.95.

Обявата 3.95. Кодът в EtaKniga на модула

"Създаване на контекстното меню, когато отворите работна книга

Под Workbook_BeforeClose (Отмени Както Булева)

"Премахване на менюто, когато затворите книгата

Стандартната модул да напише най-големия код - неговото съдържание е представено в Обява 3.96.

Обявата 3.96. Код в стандартен модул

"Премахването на едноименната менюто

С CommandBars.Add ( «MyContextMenu», msoBarPopup.

"Създаване и конфигуриране на бутоните на менюто

"Бутон" Формат на числата "

След написването на този код ще се генерират макроси създайте персонализиран контекстното меню (CreateCustomContextMenu) и го (DeleteCustomContextMenu) премахват, и макроси, които са свързани с командата на менюто, създава и цели да постави съответните раздели на Format Cells диалоговия прозорец.

След извършване CreateCustomContextMenu макро ще бъде генериран контекст меню, показано на фиг. 3.36.

Фиг. 3.36. По поръчка на контекстното меню

Това меню ще се нарича, когато щракнете с десния бутон на мишката върху който и да е област от клетки A2: D5. С помощта на своите отбори и направи бърз преход към съответния раздел на формата на активната клетка.

Generation: 0,075. База данни заявка / Cache: 1/0