Excel se svou širokou škálou funkcí a funkcí je jedním z nejoblíbenějších programů pro práci s čísly. Jedním z často se vyskytujících úkolů je práce se zlomkovými čísly. V tomto článku se podíváme na to, jak používat VBA Excel k získání zlomkové části čísla a jeho použití v různých výpočtech a operacích.
Zlomková část čísla je desetinná část čísla, která je za desetinnou čárkou. Schopnost získat zlomkovou část čísla je velmi užitečná, zejména při provádění analýzy dat nebo při výpočtech pomocí procent nebo zlomků.
V aplikaci VBA Excel existuje několik způsobů, jak získat zlomkovou část čísla. Jedním z jednoduchých způsobů je použití vestavěné funkce "Mod". Tato funkce vrací zůstatek z dělení jednoho čísla na druhé. Chcete-li získat zlomkovou část čísla, musíte najít zbytek z dělení čísla 1. Pokud například chceme získat zlomek čísla 5.67, můžeme použít následující kód:
Dim number As Double
Dim decimalPart As Double
number = 5.67
decimalPart = number Mod 1
V důsledku provádění tohoto kódu, proměnná decimalPart bude to 0.67, což je zlomková část čísla 5.67.
Kromě použití funkce " Mod "má VBA Excel také další metody práce se zlomkovými čísly, jako je použití vestavěné funkce" Format", používání matematických operátorů, jako je dělení nebo násobení, a používání vestavěných funkcí aplikace Excel.
Základní pojmy
Číslo s plovoucím bodem je číselný datový typ, který může obsahovat zlomkovou část. V VBA se čísla s plovoucím bodem zapisují pomocí desetinného bodu, jako je 3.14.
Celá část čísla je celé číslo, které je nalevo od desetinné čárky. K získání celé části čísla v VBA lze použít funkci Int.
Zlomková část čísla je desetinná čárka, která je napravo od desetinné čárky. K získání zlomkové části čísla v VBA lze použít funkci Frac.
Zaokrouhlení čísla umožňuje snížit počet desetinných míst na určitou hodnotu. VBA lze k zaokrouhlení čísla použít funkce Round, RoundUp a RoundDown.
Formátování čísla umožňuje změnit způsob zobrazení čísla, například přidat dělič tisíců nebo zadat počet desetinných míst. V VBA lze k formátování čísla použít funkci Format.
Oddělovač desetinných míst je symbol, který odděluje celou a zlomkovou část čísla. VBA oddělovač desetinných míst závisí na nastavení lokálního (regionálních parametrů) operačního systému.
Dělitel tisíců je symbol, který rozděluje tisíce, miliony atd. v celé části čísla. VBA je oddělovač tisíců také závislý na Nastavení lokálu operačního systému.
Převod řádku na číslo je proces převodu znaků řádku na číselnou hodnotu. V VBA lze k převodu řetězce na číslo použít funkce Val, CDbl, CInt atd.
Převod čísla na řádek je proces převodu číselné hodnoty na znaky řetězce. V VBA lze k převodu čísla na řádek použít funkce CStr, Format atd.
Získání zlomkové části čísla VBA Excel
Zlomková část čísla VBA Excel představuje desetinnou část čísla, která je za desetinnou čárkou nebo bodem. VBA Excel má několik způsobů, jak získat tuto zlomkovou část čísla a pracovat s ní.
-
Použití funkce FMod funkce FMOD vrací zůstatek z dělení čísla na jiné číslo. K získání zlomkové části čísla lze tuto funkci použít vydělením původního čísla 1. Například:
Dim number As DoubleDim fractionalPart As Doublenumber = 10.45fractionalPart = number - Int(number)' fractionalPart будет содержать дробную часть числа, то есть 0.45
Dim number As StringDim fractionalPart As Stringnumber = "10.45"fractionalPart = Split(number, ".")(1)' fractionalPart будет содержать дробную часть числа, то есть "45"
Dim number As DoubleDim fractionalPart As DoubleDim n As Integernumber = 10.45fractionalPart = (number * (10 ^ n)) Mod (10 ^ n)' При n = 2, fractionalPart будет содержать дробную часть числа, то есть 0.45
VBA Excel tedy existuje několik způsobů, jak získat zlomkovou část čísla a pracovat s ním. Výběr konkrétního způsobu závisí na požadované přesnosti a formátu reprezentace čísel ve vašem projektu.
Práce se zlomkovou částí čísla v Excelu VBA
V programovacím jazyce VBA Excel existuje několik způsobů, jak získat zlomek čísla a pracovat s ním. To může být užitečné, když je nutné provést určité operace pouze se zlomkovou částí čísla nebo když je nutné zaokrouhlit číslo na daný počet desetinných míst.
Jedním z jednoduchých způsobů, jak získat zlomkovou část čísla, je použití funkce Mod. Vrací zbytek z dělení jednoho čísla na druhé. Chcete-li například získat zlomek čísla 3.14, můžete použít následující kód:
Sub GetFractionPart()
Dim number As Double
Dim fractionPart As Double
number = 3.14
fractionPart = number Mod 1
MsgBox "zlomková část čísla:" & fractionPart
End Sub
V tomto příkladu proměnná number obsahuje číslo 3.14 a proměnná fractionPart získává zbytek z dělení tohoto čísla 1, což je jeho zlomková část. Poté pomocí funkce MsgBox vypustíme hodnotu zlomkové části na obrazovku.
Dalším způsobem, jak získat zlomkovou část čísla VBA Excelu, je použití funkce Round. Zaokrouhlí číslo na daný počet desetinných míst a vrátí jeho zlomkovou část. Chcete-li například získat zlomkovou část čísla 3.14 se dvěma znaky za desetinnou čárkou, můžete použít následující kód:
Sub GetFractionPart()
Dim number As Double
Dim fractionPart As Double
number = 3.14
fractionPart = number - Round(number, 0)
MsgBox "zlomková část čísla:" & fractionPart
End Sub
V tomto příkladu odečteme od původního čísla jeho celou část získanou pomocí funkce Round, abychom získali jeho zlomkovou část s daným počtem desetinných míst.
To jsou pouze dva příklady práce se zlomkovou částí čísla v Excelu VBA. Možností tohoto programovacího jazyka pro práci s čísly je mnoho a můžete si vybrat vhodnou možnost pro své konkrétní úkoly.
Příklady použití
Níže jsou uvedeny příklady použití funkce pro práci se zlomkovou částí čísla v aplikaci VBA Excel:
| Příklad | Popis | Výsledek |
|---|---|---|
| Dim myNumber As Double: myNumber = 3.14159 | Oznámení a inicializace proměnné myNumber | myNumber = 3.14159 |
| Dim fractionalPart As Double: fractionalPart = GetFractionalPart(myNumber) | Volání funkce getfractionalpart pro získání zlomkové části čísla | fractionalPart = 0.14159 |
| Dim roundedPart As Double: roundedPart = Round(fractionalPart, 2) | Zaokrouhlení zlomkové části na dvě desetinná místa | roundedPart = 0.14 |
| MsgBox "zlomková část čísla:" & roundedPart | Výstup zaokrouhlené zlomkové části čísla ve zprávě | Vyskakovací okno s textem "zlomková část čísla: 0.14" |