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?