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