Excel VBA format broj

VBA dolazi s ugrađenom funkcijom za oblikovanje brojeva. Naziv ugrađene funkcije je "Format format". Ova funkcija oblikuje određeni broj u formatu koji zahtijeva korisnik.
Prije nego što nastavimo, razumjet ćemo prvo što je oblikovanje brojeva. Oblikovanje broja u osnovi znači da bi se određeni broj trebao prikazati na određeni način. Na primjer, ako želite vidjeti određeni broj u smislu dvije decimalne točke (150.55) ili ako želite isti broj vidjeti kao decimalna točka (150). Ovo su samo primjeri. U osnovi, ove oblike brojeva možemo svrstati u četiri kategorije.

  • Decimalni broj bodova
  • Negativni brojevi u zagradama
  • Vodeće znamenke
  • Grupne znamenke

Naučit ćemo sve formatiranje u VBA uz pomoć primjera. No prvo, pogledajmo sintaksu VBA funkcije za Format format.

Dakle, kao što možete vidjeti sintaksu VBA funkcije za broj formata na gornjoj snimci zaslona, ​​razdvojimo tu funkciju i razumjet ćemo svaki dio funkcije.

  1. Izraz: Kao što vidite, prvi dio funkcije je izraz koji nije ništa drugo nego broj koji želimo oblikovati.
  2. Numeričan broj nakon decimalne točke : Drugi dio funkcije traži broj znamenki broja koji želite vidjeti nakon decimalne točke.
  3. Vodeća znamenka: ovo je korisno kada je broj između -1 i 1 što znači kada je broj veći od -1 i manji od 1. Na primjer, 0, 25.

Ako želite vidjeti nulu prije decimalne točke, trebate umetnuti argument u funkciju TRUE ili -1. Rezultat će biti 0, 55.

Ali ako umetnete vrijednost u argument kao FALSE ili 0, rezultat će biti 55.

  1. Koristite nadređeni za negativne brojeve : ovaj se dio koristi za negativne brojeve. Ako želite vidjeti negativne brojeve u zagradi, trebate dati argument kao TRUE ili -1 i rezultat će biti (156). Ali ako argument navedete kao FALSE ili 0, rezultat će biti -156.
  2. Grupne znamenke : Ovo je posljednji dio funkcije koja se koristi za tisuću separatora. Ako želite vidjeti brojeve s razdvajanjem tisuću, argument trebate unijeti u TRUE ili -1, a rezultat će biti 52.000. Ali ako navedete isti argument kao FALSE ili 0, rezultat će biti kao 52000.

Kako formatirati broj pomoću VBA koda?

Sada kad razumijete različite oblike oblikovanja brojeva i ugrađenu funkciju VBA formata broja, možemo nastaviti unaprijed i vidjeti kako to možemo koristiti uz pomoć primjera.

Ovdje možete preuzeti ovaj format obrasca VBA Format broja - VBA Format broja Predložak Excela

Prije nego što prijeđete na primjere, slijedite niže osnovne korake ako ste novi u VBA makronaredbi. U VBA modul možete umetnuti niže kodove.

Korak 1: Stvorite makro ime koje je prvi redak u kodu kao što možete vidjeti na snimci zaslona.

Korak 2: Deklarirajte jednu od varijabli kao String jer rezultat koji daje funkcija VBA Format number je String.

Kodirati:

 Sub Format_Number_Example1 () Dim MyNum kao String End Sub

Sada možemo nastaviti s našim primjerima.

Decimalne točke - Primjer br. 1

Pretpostavimo da radimo s brojem 56456 i želite vidjeti dva broja nakon decimalne točke.

Korak 1: U kôd možete dodati ugrađenu VBA funkciju kao što je dolje navedeno.

Mynum = Format broj (

Korak 2: Kao što znate, prvi korak funkcije je izraz koji nije ništa drugo nego broj koji želite formatirati. 56456 u našem slučaju.

Mynum = Format broj (56456,

Korak 3: Sljedeći korak je Numdigitafterdecimal koji nije ništa drugo nego broj cifara koji želite vidjeti nakon decimalne točke koja je u našem slučaju 2.

Kodirati:

 Pod Format_Number_Example1 () Dim MyNum kao niz MyNum = FormatNumber (56456, 2) MsgBox MyNum End Sub

Korak 4 : Sljedeći korak je prikazivanje broja u okviru s porukama. VBA ima ugrađenu funkciju za prikaz vrijednosti u okviru s porukama koji je MSGBOX.

Dakle, samo trebate umetnuti donji kôd nakon što umetnete funkciju Format broj za MyNum.

Kodirati:

 Pod Format_Number_Example1 () Dim MyNum kao niz MyNum = FormatNumber (56456, 2) MsgBox MyNum End Sub

Kao što vidite posljednji redak u kodu je End Sub, što znači VBA kod za makronaredbe nakon toga.

Korak 6: Kako se kodiranje broja formata završava, možete pokrenuti makronaredbu i nakon pokretanja makronaredbe možete vidjeti donji rezultat.

Tisuću separatora - Primjer br. 2

Pretpostavimo sada istim primjerom, moramo pokazati isti broj 56456 s tisućama separatora. U tom slučaju moramo dati zadnji argument kao "vbTrue" kao što je prikazano na slici dolje.

Kodirati:

Pod Format_Number_Example2 ()

Dim MyNum kao niz

MyNum = FormatNumber (56456, 2,,, vbTrue)

MsgBox MyNum

Kraj Sub

Nakon pokretanja makronaredbe moći ćete vidjeti donji rezultat.

Ako kao posljednji argument odaberete "vbFalse", broj se neće prikazati kao separator tisuće.

Prikaži negativni broj u zagradi - Primjer # 3

Pretpostavimo da je isti broj 56456 u gornjem primjeru negativan i trebate prikazati negativne brojeve u zagradi, tada bi četvrti argument u funkciji trebao biti "vbTrue" kao što je prikazano na slici dolje.

Kodirati:

 Pod Format_Number_Example3 () Dim MyNum kao niz MyNum = FormatNumber (-56456, 2,, vbTrue, vbTrue) MsgBox MyNum End Sub

Kao što možete vidjeti Četvrti i Peti argument u kodu su "vbTrue" što znači oblikovanje negativnog broja (četvrti argument) i oblikovanje za hiljadu separatora (peti argument), obje su istinite. Tako ćete vidjeti negativni broj unutar zagrade i s Tisuću separatora kao što je prikazano na slici dolje.

Formatiranje za broj između -1 i 1 - Primjer # 4

Pretpostavimo da je broj 0, 567 što je između -1 i 1, tada imate dvije mogućnosti formatiranja broja. Prva je mogućnost prikazati nulu prije decimalne točke ili ne pojavljivati ​​nulu prije decimalne točke.

Ako odaberete opciju za prikaz nule prije decimalne točke, trebali biste navesti treći argument u funkciji "vbTrue" kao što je prikazano na slici dolje.

Kodirati:

 Pod Format_Number_Example4 () Dim MyNum kao niz MyNum = FormatNumber (0, 567, 2, vbTrue, vbTrue, vbTrue) MsgBox MyNum End Sub

Nakon pokretanja makro koda moći ćete vidjeti donji rezultat.

Kao što vidite, rezultat prikazuje samo dvije znamenke nakon decimalne točke jer smo kao drugi argument u funkciji naveli samo 2.

Ako odaberete treći argument kao "vbFalse" kao što je prikazano na snimci zaslona u nastavku.

Kodirati:

 Pod Format_Number_Example5 () Dim MyNum kao niz MyNum = FormatNumber (0, 567, 2, vbFalse, vbTrue, vbTrue) MsgBox MyNum End Sub

Tada nećete vidjeti nulu prije decimalne točke kao što je prikazano na slici ispod.

Stvari koje treba zapamtiti

  • Funkcija VBA FormatNumber ima 5 argumenata, pa pribavite ispravne argumente redoslijedom funkcija. Moramo slijediti redoslijed funkcija, drugog izlaza nema.
  • Ako bilo koji argument zadržite kao Prazan, automatski će se razmotriti zadana opcija VBA.
  • Budite oprezni s argumentima vbTrue i vbFalse za posljednja tri argumenta za oblikovanje broja.
  • Za prvi argument koji je izraz, možete unijeti i referencu ćelije u listu excela umjesto bilo kojeg broja.

Preporučeni članci

Ovo je vodič za VBA format broj. Ovdje smo raspravljali o tome kako formatirati brojeve u Excelu koristeći VBA kod, zajedno s praktičnim primjerima i download-om Excel predloška. Možete i pregledati ostale naše predložene članke -

  1. Kako se koristi VBA TRIM funkcija?
  2. VBA nizovi | Kompletan vodič
  3. Kako se koristi VBA Select Case?
  4. Excel VBA funkcija za pronalaženje

Kategorija:

VBA