Číslo formátu VBA - Jak formátovat čísla pomocí VBA NumberFormat?

Funkce formátu ve VBA se používá k formátování daných hodnot v požadovaném formátu, tato funkce má v zásadě dva povinné argumenty, jeden je vstup, který je převzat ve formě řetězce a druhý argument je typ formátu, který chceme použít například pokud použijeme Format (0,99, „Procent“), výsledek bude 99%.

Formátování čísla ve VBA Excel

VBA stojí daleko před běžnými funkcemi aplikace Excel. VBA má mnoho svých integrovaných funkcí, stejně jako to, jak máme v listu více než 500 operací. Jeden takový vzorec ve VBA je „Format Number“.

Ano, slyšeli jste to dobře. Ve VBA máme funkci nazvanou „FormatNumber“ . V tomto článku provedeme kompletní prohlídku této funkce výhradně.

Jak formátovat čísla pomocí VBA NumberFormat?

Jak sám název funkce říká, naformátuje dané číslo podle pokynů k formátování uvedených uživatelem.

Formátování čísel není nic jiného než přidávání desetinných míst, uzavírání záporných čísel do závorek, zobrazování úvodních nul pro desetinné hodnoty atd. Pomocí funkce VBA FormatNumber můžeme použít styl formátování na čísla, se kterými pracujeme. Níže je uvedena syntaxe funkce

  • Výraz: Toto není nic jiného než číslo, které potřebujeme zformátovat.
  • Počet číslic za desetinnou čárkou: Kolik číslic chcete jako pozici desetinných míst pro pravou stranu čísla.
  • Zahrnout úvodní číslici : Úvodní číslice nejsou nic jiného než číslice před začátkem čísla. To platí pro hodnoty menší než 1, ale větší než -1.
    • Pokud chcete zobrazit nulu před desetinnou hodnotou, můžete předat argument jako PRAVDA nebo -1 a výsledek bude. „0,55“
    • Pokud nechcete zobrazit nulu před desetinnou hodnotou, můžete argument předat jako FALSE nebo 0 a výsledek bude „.55“.
    • Ve výchozím nastavení bude hodnota -2, tj. Regionální nastavení počítače.
  • Použít rodiče pro záporná čísla: Pokud chcete zobrazit záporná čísla v závorkách, můžete předat argument jako PRAVDA nebo -1 a výsledek bude. „(255)“
    • Pokud chcete zobrazit záporná čísla bez závorek, můžete argument předat jako FALSE nebo 0 a výsledek bude. "-255."
  • Skupinové číslice: Ať už chcete přidat oddělovač tisíců, nebo ne. Pokud ano, argumentem je PRAVDA nebo -1. Pokud ne, argument je FALSE nebo 0. Ve výchozím nastavení je hodnota -2 tj. Rovná se místnímu nastavení počítače.

Příklady funkce Excel VBA FormatNumber

Uvidíme praktické příklady funkce Excel VBA Format Number. Každý argument provedeme samostatně.

Za tímto účelem vytvořte název makra a deklarujte jednu z proměnných jako řetězec. Proměnnou musíme nahlásit jako řetězec, protože výsledek daný funkcí VBA FormatNumber je pouze jako řetězec.

Kód:

Sub Format_Number_Example1 () Dim MyNum jako řetězec End Sub

Příklad č. 1 - Přidat desetinná místa před číslo

Krok 1 - Předpokládejme, že pracujeme s číslem 25000, a musíme jej naformátovat a přidat desetinná místa napravo od čísla. Přiřaďte hodnotu naší proměnné.

Kód:

Sub Format_Number_Example1 () Dim MyNum jako řetězec MyNum = FormatNumber (End Sub

Krok 2 - Nejprve je výraz, tj. Číslo, které potřebujeme zformátovat, takže naše číslo je 25000.

Kód:

Sub Format_Number_Example1 () Dim MyNum jako řetězec MyNum = FormatNumber (25000, End Sub

Krok 3 - Další je, kolik číslic musíme přidat, tj. 2 čísla.

Kód:

Sub Format_Number_Example1 () Dim MyNum jako řetězec MyNum = FormatNumber (25000, 2) End Sub

Krok č. 4 - Zobrazit hodnotu proměnné v okně se zprávou VBA.

Kód:

Sub Format_Number_Example1 () Dim MyNum jako řetězec MyNum = FormatNumber (25000, 2) MsgBox MyNum End Sub

Krok # 5 - Výsledek tohoto makra je takový.

Napravo od čísla vidíme dvě desetinná místa.

Příklad č. 2 - číslo skupiny, tj. Oddělovač tisíců

Pro stejné číslo můžeme přidat nebo odstranit tisíc oddělovačů. Pokud chceme ukázat tisíc oddělovačů, musíme jako poslední argument vybrat vbTrue .

Kód:

Sub Format_Number_Example1 () Dim MyNum jako řetězec MyNum = FormatNumber (25000, 2,,, vbTrue) MsgBox MyNum End Sub

Výsledek bude hoden takto.

Nyní, pokud vybereme vbFalse, pak nebudeme mít tisíc oddělovačů.

Kód:

Sub Format_Number_Example1 () Dim MyNum jako řetězec MyNum = FormatNumber (25000, 2,,, vbFalse) MsgBox MyNum End Sub

Výsledek tohoto kódu, jako je tento.

Pokud vyberu vbUseDefault, dostaneme výsledek podle nastavení systému. Níže je uveden výsledek.

Takže moje nastavení systému má ve výchozím nastavení tisíc oddělovačů.

Příklad č. 3 - Uzavřete závorku pro záporná čísla

Pokud máme škodlivé číslo, můžeme zobrazit záporné číslo v závorkách. Musíme vybrat vbTrue v části „Použít rodiče pro záporná čísla“.

Kód:

Sub Format_Number_Example1 () Dim MyNum jako řetězec MyNum = FormatNumber (-25000, 2,, vbTrue) MsgBox MyNum End Sub

Výsledek je nyní takový.

Pokud vybereme vbFalse, dostaneme záporné číslo se znaménkem minus.

Kód:

Sub Format_Number_Example1 () Dim MyNum jako řetězec MyNum = FormatNumber (-25000, 2,, vbFalse) MsgBox MyNum End Sub

Výsledek je nyní takový.

Zajímavé články...