01 Что делает макрос
Некоторые электронные таблицы огромны. Иногда, мы вынуждены изменить масштаб изображения, чтобы видеть всю таблицу на экране. Это удобный макрос, который будет автоматически изменять масштаб при двойном щелчке.
С помощью этого макроса, вы можете дважды щелкнуть на ячейку в таблице, чтобы увеличить на 200 процентов. Дважды щелкните снова и Excel изменит масштаб изображения обратно на 100 процентов. Также вы можете изменить значения в коде, чтобы это соответствовало вашим потребностям.
02 Код макроса
Private
Sub
Worksheet_BeforeDouble Click()
'Проверить текущее состояние, если масштаб не 100%
‘Поставить масштаб 100%
If
ActiveWindow.Zoom <> 100
Then
ActiveWindow.Zoom = 100
‘В ином случае поставить 200%
Else
ActiveWindow.Zoom = 200
End
If
End
Sub
03 Как работает макрос
Обратите внимание, что побочный эффект двойного щелчка ячейки является то, что вы перейдете в режим редактирования ячейки. Вы можете выйти из режима редактирования, нажав клавишу Esc на клавиатуре.
Если вам это мешает, вы можете добавить это заявление в конце процедуры:
Application.SendKeys («{ESC}»)
Этот оператор имитирует нажатия ESC на клавиатуре.
04 Как использовать
Для реализации этого макроса, вам нужно скопировать и вставить его в окно кода события Worksheet_BeforeDouble Click. Это обеспечит запуск макроса каждый раз, когда вы дважды щелкните на листе.
1. Активируйте редактор Visual Basic, нажав ALT + F11.
2. В окне проекта, найдите свой проект / имя рабочей книги и нажмите на знак плюс рядом с ним, чтобы увидеть все листы.
3. Нажмите на лист, из которого вы хотите вызвать код.
4. Выберите в выпадающем списке вверху слева параметр Worksheet, а в правом выпадающем списке выберите событие BeforeDoubleClick.
5. Введите или вставьте код во вновь созданном модуле.
05 Скачать файл
Автор проекта
Дмитрий Якушев
Привет! Меня зовут Дмитрий. С 2014 года Microsoft Cretified Trainer. Вместе с командой управляем этим сайтом. Наша цель - помочь вам эффективнее работать в Excel.
Изучайте наши статьи с примерами формул, сводных таблиц, условного форматирования, диаграмм и макросов. Записывайтесь на наши курсы или заказывайте обучение в корпоративном формате.
Сайт https://akademia-excel.ru/
ИП Якушев Дмитрий Александрович
ОГРНИП: 314501721200022
ИНН: 501706813807
Образовательная лицензия № Л035-01255-50/01194039
Почта: info@akademia-excel.ru
Телефон для связи: + 7 (958) 697-73-88, + 7 (495) 145-23-86
Регистрация на сайте означает согласие с пользовательским соглашением и на получение рассылки и рекламных материалов.
Политика в отношении обработки и защиты персональных данных.
Банковские реквизиты:
Расчетный счет 40802810500000003597
Банк АО «Тинькофф Банк»
Юридический адрес Банка Москва, 123060,1-й Волоколамский проезд, д. 10, стр. 1
Корр. счет Банка 30101810145250000974
ИНН Банка 7710140679
БИК Банка 044525974
Подписывайтесь на нас в соц.сетях:
Сайт https://akademia-excel.ru/
ИП Якушев Дмитрий Александрович
ОГРНИП: 314501721200022
ИНН: 501706813807
Образовательная лицензия № Л035-01255-50/01194039
Банковские реквизиты:
Расчетный счет 40802810500000003597
Банк АО «Тинькофф Банк»
Юридический адрес Банка Москва, 123060,1-й Волоколамский проезд, д. 10, стр. 1
Корр. счет Банка 30101810145250000974
ИНН Банка 7710140679
БИК Банка 044525974
Регистрация на сайте означает согласие с пользовательским соглашением и на получение рассылки и рекламных материалов.
Политика в отношении обработки и защиты персональных данных.
Почта: info@akademia-excel.ru
Телефон для связи: + 7 (958) 697-73-88, + 7 (495) 145-23-86
Написать в тех.поддержку
Подписывайтесь:
авторизуйтесь