VBA formāta numurs - Kā formatēt numurus ar VBA NumberFormat?

Satura rādītājs

Formatēšanas funkcija VBA tiek izmantota, lai formatētu norādītās vērtības vēlamajā formātā, šai funkcijai pamatā ir divi obligāti argumenti, viens ir ievade, kas tiek ņemta virknes formā, un otrais arguments ir formāta veids, kuru mēs vēlamies izmantot piemēram, ja izmantojam formātu (.99, “Procenti”), rezultāts būs 99%.

Formatēt numuru VBA Excel

VBA stāv priekšā normālajām Excel funkcijām. VBA ir daudz iebūvēto funkciju, tāpat kā tas, kā mums darblapā ir vairāk nekā 500 operāciju. Viena šāda formula VBA ir “Formāta numurs”.

Jā, jūs to dzirdējāt pareizi. Mums VBA ir funkcija ar nosaukumu “FormatNumber” . Šajā rakstā mēs apskatīsim tikai šo funkciju.

Kā formatēt numurus ar VBA NumberFormat?

Kā saka pats funkcijas nosaukums, tas formatēs norādīto numuru atbilstoši lietotāja sniegtajām formatēšanas instrukcijām.

Skaitļu formatēšana ir nekas cits kā decimāldaļskaitļu pievienošana, negatīvo skaitļu iekavās iekļaušana, decimālvērtību sākuma nulles parādīšana utt. Izmantojot funkciju VBA FormatNumber , formatēšanas stilu varam piemērot skaitļiem, ar kuriem strādājam. Zemāk ir funkcijas sintakse

  • Izteiksme: tas nav nekas cits kā skaitlis, kas mums jāformatē.
  • Ciparu skaitļi pēc decimāldaļas: Cik ciparu vēlaties cipariem aiz komata skaitļa labajā pusē.
  • Iekļaut vadošo ciparu: Vadošais cipars ir tikai cipari pirms skaitļa sākuma. Tas attiecas uz vērtībām, kas mazākas par 1, bet lielākas par -1.
    • Ja vēlaties rādīt nulli pirms decimāldaļas, argumentu varat nodot kā TRUE vai -1, un rezultāts būs. “0,55”
    • Ja nevēlaties rādīt nulli pirms decimāldaļas, argumentu varat nosūtīt kā FALSE vai 0, un rezultāts būs “.55”.
    • Pēc noklusējuma vērtība būs -2, ti, reģionālā datora iestatījumi.
  • Izmantojiet vecākus negatīvajiem skaitļiem: ja vēlaties negatīvos skaitļus parādīt iekavās, varat nodot argumentu kā TRUE vai -1, un rezultāts būs. “(255)”
    • Ja jūs vēlaties parādīt negatīvos skaitļus bez iekavām, varat nodot argumentu kā FALSE vai 0, un rezultāts būs. “-255.”
  • Grupas cipari: vai vēlaties pievienot tūkstoš atdalītāju, vai nē. Ja jā, arguments ir TRUE vai -1. Ja nē, arguments ir FALSE vai 0. Pēc noklusējuma vērtība ir -2, ti, vienāda ar reģionālajiem datora iestatījumiem.

Excel VBA FormatNumber funkcijas piemēri

Mēs redzēsim praktiskos Excel VBA formāta numura piemērus. Katru argumentu mēs izpildīsim atsevišķi.

Šim nolūkam izveidojiet makro nosaukumu un deklarējiet vienu no mainīgajiem kā virkni. Mums mainīgais ir jāziņo kā virkne, jo rezultāts, ko sniedz VBA funkcija FormatNumber, ir tikai virkne.

Kods:

Apakšformāts_Number_Example1 () Dim MyNum kā virknes beigu apakšsadaļa

1. piemērs - pievienojiet skaitļus aiz komata skaitļa priekšā

1. solis - pieņemsim, ka esam strādājuši ar skaitli 25000, un mums tas ir jāformatē un skaitļa labajā pusē jāpievieno komati. Piešķiriet mūsu mainīgajam vērtību.

Kods:

Apakšformāts_Number_Example1 () Dim MyNum kā virkne MyNum = FormatNumber (beigu apakšnodaļa

2. solis - pirmais ir izteiksme, ti, skaitlis, kas mums jāformatē, tāpēc mūsu skaitlis ir 25000.

Kods:

Apakšformāts_Number_Example1 () Dim MyNum kā virkne MyNum = FormatNumber (25000, End Sub

3. solis - Nākamais ir tas, cik cipari mums jāpievieno, ti, 2 cipari.

Kods:

Apakšformāts_Number_Example1 () Dim MyNum kā virkne MyNum = FormatNumber (25000, 2) Beigas Sub

4. solis - parādiet mainīgā vērtību VBA ziņojumu lodziņā.

Kods:

Apakšformāts_Number_Example1 () Dim MyNum kā virkne MyNum = FormatNumber (25000, 2) MsgBox MyNum End Sub

5. solis - šī makro rezultāts ir šāds.

Pa labi no skaitļa var redzēt divas zīmes aiz komata.

2. piemērs - grupas numurs, ti, tūkstoš atdalītājs

Attiecībā uz to pašu numuru mēs varam pievienot vai izdzēst tūkstoš separatoru. Ja mēs vēlamies parādīt tūkstoti atdalītāju, mums pēdējam argumentam jāizvēlas vbTrue .

Kods:

Apakšformāts_Number_Example1 () Dim MyNum kā virkne MyNum = FormatNumber (25000, 2,,, vbTrue) MsgBox MyNum End Sub

Tas iemetīs šādu rezultātu.

Ja atlasīsit vbFalse, mēs nesaņemsim tūkstoti atdalītāju.

Kods:

Apakšformāts_Number_Example1 () Dim MyNum kā virkne MyNum = FormatNumber (25000, 2,,, vbFalse) MsgBox MyNum End Sub

Šāda koda rezultāts ir līdzīgs šim.

Ja es izvēlos vbUseDefault, mēs iegūstam rezultātu atbilstoši sistēmas iestatījumam. Zemāk ir rezultāts.

Tāpēc manam sistēmas iestatījumam pēc noklusējuma ir tūkstotis atdalītāju.

3. piemērs - pievienojiet negatīvo skaitļu iekavas

Ja mums ir kaitīgs skaitlis, mēs varam parādīt negatīvo skaitli iekavās. Mums ir nepieciešams, lai izvēlētos vbTrue zem "Izmantot vecākiem par negatīviem skaitļiem."

Kods:

Apakšformāts_Number_Example1 () Dim MyNum kā virkne MyNum = FormatNumber (-25000, 2,, vbTrue) MsgBox MyNum End Sub

Tagad šāds rezultāts.

Ja atlasīsim vbFalse, mēs iegūsim negatīvu skaitli ar mīnus zīmi.

Kods:

Apakšformāts_Number_Example1 () Dim MyNum kā virkne MyNum = FormatNumber (-25000, 2,, vbFalse) MsgBox MyNum End Sub

Tagad šāds rezultāts.

Interesanti raksti...