Как увеличить или уменьшить масштаб ячеек при щелчке по списку проверки данных в Excel?
Шрифт в раскрывающемся списке проверки данных фиксирован и не зависит от размера шрифта, заданного на листе. Ниже приведён макрокод, который позволяет изменять масштаб при щелчке по ячейкам со списком проверки данных в Excel.
Увеличение или уменьшение масштаба списка проверки данных
Увеличение или уменьшение масштаба списка проверки данных
Чтобы увеличить масштаб конкретного списка проверки данных, воспользуйтесь приведённым ниже кодом.
1. Щёлкните правой кнопкой мыши по вкладке нужного листа и выберите Просмотреть код, чтобы открыть окно Microsoft Visual Basic для приложений.
2. В открывшемся окне скопируйте и вставьте указанный код в сценарий. См. снимок экрана:
VBA: Увеличение масштаба конкретного списка проверки данных
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice20171215
On Error GoTo xErr
If Target.Validation.Type > -1 Then
ActiveWindow.Zoom = 140
Exit Sub
End If
xErr:
ActiveWindow.Zoom = 100
End Sub
3. Сохраните код и вернитесь на лист. После щелчка по ячейке C1, содержащей список проверки данных, масштаб автоматически увеличится.
 |  |  |
Совет:
Если вы хотите изменять масштаб при щелчке по любому списку проверки данных, используйте следующий код:
VBA: Изменение масштаба при щелчке по списку проверки данных
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice20171215
On Error GoTo xErr
If Target.Validation.Type > -1 Then
ActiveWindow.Zoom = 140
Exit Sub
End If
xErr:
ActiveWindow.Zoom = 100
End Sub
Смежные статьи:
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек