Funkcija formatiranja v VBA se uporablja za formatiranje danih vrednosti v želeni obliki, ta funkcija ima v bistvu dva obvezna argumenta, eden je vhod, ki je v obliki niza, drugi argument pa je vrsta zapisa, ki ga želimo uporabiti na primer, če uporabimo Format (.99, "Odstotek"), bomo dobili rezultat 99%.
Številka oblike v programu VBA Excel
VBA je daleč pred običajnimi Excelovimi funkcijami. VBA ima veliko vgrajenih funkcij, tako kot imamo na delovnem listu več kot 500 operacij. Ena takih formul v VBA je »Format Number«.
Da, prav ste slišali. V VBA imamo funkcijo, imenovano »FormatNumber« . V tem članku si bomo ogledali izključno to funkcijo.

Kako oblikovati številke s formatom VBA NumberFormat?
Kot pove že samo ime funkcije, bo formatirala dano številko v skladu z navodili za oblikovanje, ki jih je dal uporabnik.
Oblikovanje števil ni nič drugega kot dodajanje decimalnih vej, vključevanje negativnih števil v oklepaje, prikaz vodilnih nič za decimalne vrednosti itd. S funkcijo VBA FormatNumber lahko uporabimo slog oblikovanja za številke, s katerimi delamo. Spodaj je sintaksa funkcije

- Izraz: To ni nič drugega kot številka, ki jo moramo oblikovati.
- Številke po decimalni številki : Koliko števk želite za decimalno mesto na desni strani števila.
- Vključi glavno številko : vodilna številka ni nič drugega kot številke, preden se številka začne. To velja za vrednosti, manjše od 1, vendar večje od -1.
- Če želite pred decimalno vrednostjo prikazati ničlo, lahko argument posredujete kot TRUE ali -1 in rezultat bo. “0,55”
- Če ne želite prikazati ničle pred decimalno vrednostjo, lahko argument predate kot FALSE ali 0, rezultat pa bo ".55."
- Privzeto bo vrednost -2, tj. Regionalne nastavitve računalnika.
- Uporabi starše za negativne številke: če želite negativne številke prikazati v oklepaju, lahko argument posredujete kot TRUE ali -1 in rezultat bo. »(255)«
- Če želite prikazati negativna števila brez oklepajev, lahko argument posredujete kot FALSE ali 0, rezultat pa bo. "-255."
- Skupinske številke: ali želite dodati tisoč ločil ali ne. Če je odgovor pritrdilen, je TRUE ali -1. V nasprotnem primeru je argument FALSE ali 0. Privzeto je vrednost -2 tj. Enaka regionalnim nastavitvam računalnika.
Primeri funkcije Excel VBA FormatNumber
Videli bomo praktične primere funkcije Excel VBA Format Number. Vsak argument bomo izvedli posebej.
V ta namen ustvarite ime makra in eno od spremenljivk prijavite kot niz. Spremenljivko moramo prijaviti kot niz, ker je rezultat funkcije VBA FormatNumber samo kot niz.
Koda:
Sub Format_Number_Example1 () Dim MyNum kot niz na koncu Sub
Primer # 1 - pred decimalno številko dodajte decimalne točke
1. korak - Predpostavimo, da smo delali s številko 25000, in jo moramo formatirati ter dodati decimalna mesta desno od števila. Naši spremenljivki dodelite vrednost.
Koda:
Sub Format_Number_Example1 () Dim MyNum kot niz MyNum = FormatNumber (End Sub

2. korak - Najprej je izraz, tj. Številka, ki jo moramo oblikovati, tako da je naša številka 25000.
Koda:
Sub Format_Number_Example1 () Dim MyNum kot niz MyNum = FormatNumber (25000, End Sub

3. korak - Naslednje je, koliko števk moramo dodati, tj. 2 številki.
Koda:
Sub Format_Number_Example1 () Dim MyNum kot niz MyNum = FormatNumber (25000, 2) End Sub

4. korak - v spremenljivem polju za sporočila VBA prikažite vrednost spremenljivke.
Koda:
Sub Format_Number_Example1 () Dim MyNum As String MyNum = FormatNumber (25000, 2) MsgBox MyNum End Sub
5. korak - Rezultat tega makra je takšen.

Desno od številke vidimo dve decimalni mesti.

Primer # 2 - Številka skupine, tj. Ločilo tisočic
Za isto številko lahko dodamo ali izbrišemo tisoč ločil. Če želimo prikazati tisoč ločil, moramo za zadnji argument izbrati vbTrue .
Koda:
Sub Format_Number_Example1 () Dim MyNum kot niz MyNum = FormatNumber (25000, 2,,, vbTrue) MsgBox MyNum End Sub
Rezultat bo takšen.

Če izberemo vbFalse, ne bomo dobili tisoč ločil.
Koda:
Sub Format_Number_Example1 () Dim MyNum kot niz MyNum = FormatNumber (25000, 2,,, vbFalse) MsgBox MyNum End Sub
Rezultat te kode je takšen.

Če izberem vbUseDefault, dobimo rezultat v skladu s sistemsko nastavitvijo. Spodaj je rezultat tega.

Torej ima moja sistemska nastavitev privzeto tisoč ločil.
Primer # 3 - Zaprite oklepaj za negativne številke
Če imamo škodljivo število, lahko negativno število prikažemo v oklepaju. Moramo izbrati vbTrue pod »Use starše za negativna števila."
Koda:
Sub Format_Number_Example1 () Dim MyNum kot niz MyNum = FormatNumber (-25000, 2,, vbTrue) MsgBox MyNum End Sub
Zdaj rezultat takšen.

Če izberemo vbFalse, bomo dobili negativno število z znakom minus.
Koda:
Sub Format_Number_Example1 () Dim MyNum kot niz MyNum = FormatNumber (-25000, 2,, vbFalse) MsgBox MyNum End Sub
Zdaj rezultat takšen.
