Измените мени десним кликом да бисте позвали макро - примери кода ВБА

Десним тастером миша позовите макро

Ево кода који ће омогућити кориснику да изабере вашу макро из подразумеваног менија који се појави након што десним тастером миша кликну на ћелију.

1. Ставите следећи код у прозор кода ТхисВоркбоок

 Привате Суб Воркбоок_Опен () Дим МиМену Ас Објецт Сет МиМену = Апплицатион.СхортцутМенус (клВорксхеетЦелл) _ .МенуИтемс.АддМену ("Ово је мој прилагођени мени", 1) Са МиМену.МенуИтемс .Додати "МиМацро1", "МиМацро1", 1 ,, "" .Додајте "МиМацро2", "МиМацро2",, 2,, "" Енд Витх Сет МиМену = Нотхинг Енд Суб

2. Ставите следећи код у модул

 Јавни Суб мимацро1 () МсгБок "Макро1 из менија десним тастером миша" Заврши под јавни јавни Суб мимацро2 () МсгБок "Макро2 из менија десног клика" Заврши под

3. Затворите радну свеску и поново је отворите!

Ви ће помоћи развој сајта, дељење страницу са пријатељима

wave wave wave wave wave