Hogyan formázzunk egy szövegdobozt pénznemként az Excelben?
Normál esetben az Excel programban nincs beépített függvény a szövegdoboz szövegformátumának megváltoztatására (ActiveX Control). Ha azonban valamilyen célból pénznemre kell formáznia a szövegmezőbe beírt számokat. Hogyan lehet elérni? Ez a cikk egy VBA-módszert mutat be a probléma megoldására.
Formázzon egy szövegdobozt pénznemként VBA kóddal
Formázzon egy szövegdobozt pénznemként VBA kóddal
Az alábbi VBA-kód segítségével könnyedén formázhatja a szövegmezőben lévő számokat pénznemként az Excelben. Kérjük, tegye a következőket.
1. kettyenés Fejlesztő > betétlap > Szövegdoboz (ActiveX-vezérlő) szövegmező beszúrása a munkalapba. Lásd a képernyőképet:
2. Kattintson a jobb gombbal a szövegmezőre, majd kattintson a gombra Kód megtekintése a jobb egérgombbal kattintva.
3. A nyílásban Microsoft Visual Basic for Applications ablakban, kérjük, cserélje ki az eredeti kódot a Kód ablakban az alábbi VBA kódra.
VBA kód: formázza a szövegdobozt pénznemként az Excelben
Private Sub TextBox1_Change()
TextBox1.Value = Format(TextBox1.Value, "$###,##")
End Sub
Megjegyzések: A kódban 1. szövegdoboz a szövegdoboz neve, amelyen belül számokat formázol pénznemként. Kérjük, változtassa meg sajátjával.
4. megnyomni a más + Q gombok egyszerre a Microsoft Visual Basic for Applications ablak.
5. Kapcsolja ki a Tervezési módot.
Mostantól kezdve, amikor beír egy számot a szövegmezőbe, az automatikusan pénznemként formázódik, ahogy az alábbi képernyőképen látható.
Kapcsolódó cikkek:
- Hogyan válasszuk ki automatikusan a szövegdoboz szövegét, ha az Excelben van kiválasztva?
- Hogyan tölthetünk be automatikusan egy szövegdobozt, amikor Excelbe gépelünk?
- Hogyan formázzuk a szövegmezőt százalékban az Excelben?
- Hogyan lehet összefűzni több cella szövegét egy szövegdobozba az Excelben?
- Hogyan lehet letiltani a szövegmezőben történő szerkesztést, hogy megakadályozzuk a felhasználók Excel-be történő bevitelét?
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!