Как да форматирам текстово поле като валута в Excel?
Обикновено в Excel няма вградена функция за промяна на текстовия формат в текстово поле (ActiveX Control). Въпреки това, ако трябва да форматирате числа, които сте въвели в текстовото поле за валута с някаква цел. Как можете да направите, за да го постигнете? Тази статия ще ви покаже метод на VBA за решаване на този проблем.
Форматирайте текстово поле като валута с VBA код
Форматирайте текстово поле като валута с VBA код
Кодът VBA по-долу може да ви помогне лесно да форматирате числа в текстовото поле като валута в Excel. Моля, направете следното.
1. кликване Софтуерен Инженер > Поставете > Текстово поле (ActiveX Control) за вмъкване на текстово поле в работен лист. Вижте екранна снимка:
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 за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!