Как принудительно ввести заглавные буквы в текстовое поле?
В Excel мы можем быстро преобразовать нижний регистр в верхний регистр в тексте ячейки с помощью функции UPPER, но пытались ли вы когда-нибудь заставить введенный текст быть в верхнем регистре в текстовом поле? В этой статье я представлю простой код для завершения этой работы.
Принудительно вводить прописные буквы в текстовом поле с кодом VBA
Принудительно вводить прописные буквы в текстовом поле с кодом VBA
При принудительном вводе текста в текстовое поле в верхнем регистре следующий код VBA может оказать вам услугу:
1. Сначала вставьте текстовое поле, нажав Застройщик > Вставить > Текстовое поле (элемент управления ActiveX), а затем нарисуйте текстовое поле, как вам нужно, см. снимок экрана:
2. После вставки текстового поля щелкните его правой кнопкой мыши и выберите Просмотреть код из контекстного меню, чтобы открыть Microsoft Visual Basic для приложений окна, а затем замените исходный код следующим кодом VBA в пустой модуль:
Код VBA: переводить текст в верхний регистр в текстовое поле:
Private Sub TextBox1_Change()
TextBox1.Text = UCase(TextBox1.Text)
End Sub
3. Затем сохраните и закройте окно кода и выйдите из Режим дизайна, теперь, когда вы вводите текст в текстовое поле, он будет принудительно вводиться в верхнем регистре, см. снимок экрана:
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!