Číslo formátu Excel VBA
VBA přichází s vestavěnou funkcí pro formátování čísel. Název této vestavěné funkce je „Číslo formátu“. Tato funkce formátuje konkrétní číslo ve formátu, který požaduje uživatel.
Než budeme pokračovat, nejprve pochopíme, co je formátování čísel. Formátování čísel v podstatě znamená, že konkrétní číslo by mělo být uvedeno určitým způsobem. Například pokud chcete vidět konkrétní číslo v podobě dvou desetinných míst (150.55) nebo chcete vidět stejné číslo v podobě bez desetinných míst (150). Toto jsou pouze příklady. V zásadě můžeme toto formátování čísel rozdělit do čtyř kategorií.
- Desetinné tečky
- Záporná čísla v závorce
- Přední číslice
- Skupinové číslice
Naučíme se všechny formátování ve VBA pomocí příkladů. Nejprve se ale podívejme na syntaxi funkce VBA pro číslo formátu.
Takže jak vidíte syntaxi funkce VBA pro číslo formátu na výše uvedeném snímku, dejte nám tuto funkci rozbít a porozumíme každé její části.
- Expression: Jak vidíte, první část funkce je výraz, který není nic jiného než číslo, které chceme formátovat.
- Číslice za desetinnou čárkou: Druhá část funkce požaduje počet číslic čísla, které chcete vidět za desetinnou čárkou.
- Úvodní číslice: To je užitečné, když je číslo mezi -1 a 1, což znamená, když je číslo větší než -1 a menší než 1. Například 0, 25.
Takže pokud chcete vidět hodnotu nula před desetinnou čárkou, musíte do funkce vložit argument jako PRAVDA nebo -1. Výsledek bude 0, 55.
Ale pokud vložíte hodnotu do argumentu jako FALSE nebo 0, výsledek bude .55.
- Použít nadřazená čísla pro záporná čísla : Tato část se používá pro záporná čísla. Pokud chcete vidět záporná čísla v závorce, měli byste uvést argument jako PRAVDA nebo -1 a výsledek bude (156). Pokud ale zadáte argument jako FALSE nebo 0, bude výsledek -156.
- Číslice skupiny : Toto je poslední část funkce, která se používá pro tisíce oddělovačů. Pokud tedy chcete vidět čísla s oddělovačem tisíců, měli byste uvést argument jako PRAVDA nebo -1 a výsledek bude 52 000. Pokud ale zadáte stejný argument jako FALSE nebo 0, bude výsledek jako 52 000.
Jak formátovat číslo pomocí kódu VBA?
Nyní, když rozumíte různým formám formátování čísel a vestavěné funkci VBA formátu čísel, můžeme jít příkladem a zjistit, jak to můžeme použít pomocí příkladů.
Tuto šablonu formátu čísla VBA aplikace Excel si můžete stáhnout zde - šablonu formátu čísla VBA v ExceluPředtím, než přejdete k příkladům, proveďte níže uvedené základní kroky, pokud jste novým makrem VBA. Do modulu VBA můžete vložit níže uvedené kódy.
Krok 1: Vytvořte název makra, který je prvním řádkem kódu, jak můžete vidět na obrázku.
Krok 2: Deklarujte jednu z proměnných jako String, protože výsledek daný funkcí čísla formátu VBA je String.
Kód:
Sub Format_Number_Example1 () Dim MyNum jako String End Sub
Nyní můžeme pokračovat s našimi příklady.
Desetinné body - Příklad č. 1
Předpokládejme, že pracujeme s číslem 56456 a chcete vidět dvě čísla za desetinnou čárkou.
Krok 1: Do kódu můžete přidat vestavěnou funkci VBA, jak je uvedeno níže.
Mynum = Formatnumber (
Krok 2: Jak víte, prvním krokem funkce je výraz, který není nic jiného než číslo, které chcete formátovat. 56456 v našem případě.
Mynum = Formatnumber (56456,
Krok 3: Dalším krokem je Numdigitafterdecimal, což není nic jiného než počet číslic, které chcete vidět za desetinnou čárkou, což je v našem případě 2.
Kód:
Sub Format_Number_Example1 () Dim MyNum As String MyNum = FormatNumber (56456, 2) MsgBox MyNum End Sub
Krok 4 : Dalším krokem je zobrazení čísla v okně se zprávou. VBA má vestavěnou funkci pro zobrazení hodnoty v okně zprávy, které je MSGBOX.
Stačí tedy vložit níže uvedený kód po vložení funkce Formát číslo pro MyNum.
Kód:
Sub Format_Number_Example1 () Dim MyNum As String MyNum = FormatNumber (56456, 2) MsgBox MyNum End Sub
Jak vidíte, poslední řádek v kódu je End Sub, což znamená, že kód VBA pro makro končí poté.
Krok 6: Po ukončení kódování čísla formátu můžete spustit makro a po spuštění makra můžete vidět níže uvedený výsledek.
Tiskový oddělovač - Příklad č. 2
Nyní předpokládejme, že se stejným příkladem musíme ukázat stejné číslo 56456 s tisíci oddělovači. V takovém případě musíme uvést poslední argument jako „vbTrue“, jak je uvedeno na níže uvedeném snímku obrazovky.
Kód:
Sub Format_Number_Example2 ()
Dim MyNum jako řetězec
MyNum = FormatNumber (56456, 2,,, vbTrue)
MsgBox MyNum
End Sub
Po spuštění makra uvidíte níže uvedený výsledek.
Pokud jako poslední argument vyberete „vbFalse“, číslo se nebude zobrazovat jako oddělovač tisíců.
Zobrazit záporné číslo v závorce - Příklad č. 3
Předpokládejme, že stejné číslo 56456 ve výše uvedeném příkladu je záporné a musíte ukázat záporná čísla v závorce, pak by čtvrtý argument ve funkci měl být „vbTrue“, jak je uvedeno na níže uvedeném snímku obrazovky.
Kód:
Sub Format_Number_Example3 () Dim MyNum As String MyNum = FormatNumber (-56456, 2,, vbTrue, vbTrue) MsgBox MyNum End Sub
Jak vidíte, čtvrtý a pátý argument v kódu jsou „vbTrue“, což znamená, že formátování pro záporné číslo (čtvrtý argument) a formátování pro tisíc oddělovačů (pátý argument) jsou oba pravdivé. Takže uvidíte záporné číslo v závorce as tiskovými oddělovači, jak je ukázáno na níže uvedeném snímku obrazovky.
Formátování čísla mezi -1 a 1 - Příklad č. 4
Předpokládejme, že číslo je 0, 567, což je mezi -1 a 1, pak máte dvě možnosti formátování čísla. První možností je zobrazit nulu před desetinnou čárkou nebo nezobrazovat nulu před desetinnou čárkou.
Pokud zvolíte možnost zobrazovat nulu před desetinnou čárkou, měli byste zadat třetí argument ve funkci jako „vbTrue“, jak je uvedeno na níže uvedeném snímku obrazovky.
Kód:
Sub Format_Number_Example4 () Dim MyNum As String MyNum = FormatNumber (0, 567, 2, vbTrue, vbTrue, vbTrue) MsgBox MyNum End Sub
Po spuštění kódu makra uvidíte níže uvedený výsledek.
Jak vidíte, výsledek ukazuje pouze dvě číslice za desetinnou čárkou, protože jsme ve funkci zadali pouze 2 číslice.
Pokud vyberete třetí argument jako „vbFalse“, jak je ukázáno na níže uvedeném snímku obrazovky.
Kód:
Sub Format_Number_Example5 () Dim MyNum As String MyNum = FormatNumber (0, 567, 2, vbFalse, vbTrue, vbTrue) MsgBox MyNum End Sub
Potom neuvidíte nulu před desetinnou čárkou, jak je ukázáno na obrázku níže.
Co si pamatovat
- Funkce VBA FormatNumber má 5 argumentů, proto se ujistěte, že jste zadali správné argumenty v pořadí funkce. Musíme dodržovat pořadí funkce, není jiná cesta ven.
- Pokud některý z argumentů ponecháte prázdný, bude automaticky zvažovat výchozí možnost VBA.
- Buďte opatrní s argumenty vbTrue a vbFalse pro poslední tři argumenty pro formátování čísla.
- Pro první argument, kterým je výraz, můžete také zadat odkaz na buňku v excelovém listu místo libovolného čísla.
Doporučené články
Toto je průvodce číslem formátu VBA. Zde diskutujeme o tom, jak formátovat čísla v Excelu pomocí kódu VBA spolu s praktickými příklady a šablonou Excel ke stažení. Můžete také projít naše další doporučené články-
- Jak používat funkci VBA TRIM?
- Pole VBA | Kompletní výukový program
- Jak používat VBA Select Case?
- Funkce hledání Excel VBA