Jeden typ dat VBA (proměnná dimenze)

Typ s jednou proměnnou

VBA Singl datový typ se používá k ukládání čísel, která vyžadují desetinná místa. Může ukládat od -3,4028235E+38 do -1,401298E -45 pro záporné hodnoty a od 1,401298E -45 do 3,4028235E+38 pro kladné hodnoty.

Chcete -li deklarovat proměnnou Single, použijte příkaz Dim (zkratka pro Dimension):

1 Dim sngA jako Single

Potom k přiřazení hodnoty proměnné jednoduše použijte znaménko rovnosti:

1 sngA = 3658,25

Uvedení do postupu vypadá takto:

12345678 Sub sngExample ()'deklarujte dvojitou proměnnouDim sngA jako Single'naplňte dvojitou proměnnousngA = 3658,25'zobrazit pole se zprávouMsgBox sngAEnd Sub

Pokud spustíte výše uvedený kód, zobrazí se následující okno se zprávou.

Dvojitý datový typ

Datový typ Double je pouze delší verzí souboru Singl datový typ. Díky této skutečnosti může ovlivnit zaokrouhlení, pokud je použito v postupu jako Singl datový typ se zaokrouhlí na 4 desetinná místa, zatímco Dvojnásobek datový typ se zaokrouhlí na 12 desetinných míst. Pokud potřebujete více než 4 desetinná místa, můžete použít datový typ Double.

Interní nebo dlouhé datové typy

Pokud nepotřebujete desetinné místo, můžete použít datový typ Int nebo datový typ Long.

1 Dim intA jako Integer
1 Dim lngB as Long

Programování VBA | Generátor kódu pracuje pro vás!

Deklarujte jednu proměnnou na úrovni modulu nebo na globální úrovni

V předchozích příkladech jsme deklarovali Singl proměnná v rámci procedury. Proměnné deklarované pomocí procedury lze použít pouze v rámci této procedury.

Místo toho můžete deklarovat jednotlivé proměnné na úrovni modulu nebo na globální úrovni.

Úroveň modulu

Úroveň modulu proměnné jsou deklarovány v horní části modulů kódu pomocí Ztlumit tvrzení.

Tyto proměnné lze použít s jakoukoli procedurou v tomto modulu kódu.

Globální úroveň

Globální úroveň proměnné jsou také deklarovány v horní části modulů kódu. Místo použití Ztlumit prohlášení, použijte Veřejnost prohlášení, které naznačuje, že Singl proměnná je k dispozici pro použití v celém vašem projektu VBA.

1 Veřejný SngA jako svobodný

Pokud byste prohlásili Singl proměnnou na úrovni modulu a poté ji zkuste použít v jiném modulu, dojde k chybě.

Pokud jste však použili klíčové slovo Public k deklaraci souboru Singl proměnná, chyba by nenastala a postup by běžel perfektně.

Už vás nebaví hledat příklady kódu VBA? Zkuste AutoMacro!

Formátovat jeden uložený jako řetězec

Může nastat čas, kdy budete chtít formátovat jeden datový typ na řetězec - například budete chtít zobrazit symbol měny a zaokrouhlit číslo na 2 desetinná místa.

Chcete -li toho dosáhnout, použijte funkci Formát.

Následující postup

1234567891011 Dílčí testSingleToCurrencyString ()'deklarujte proměnnou řetězceDim strMoney As String'deklarujte singl a naplňte hodnotuDim sngValue as SinglesngValue = 44055.256'převeďte singl na řetězec se symbolem měny se 2 desetinnými místy.'strMoney = Formát (sngValue, "$#, ## 0,00")'zobrazit výsledekMsgBox strMoneyEnd Sub

vrátí tento výsledek:

Podobně můžete chtít zobrazit číslo jako formátované telefonní číslo.

Tento postup:

1234567891011 Dílčí test SingleToPhone ()'deklarujte proměnnou řetězceDim strPhone jako řetězec'deklarujte singl a naplňte hodnotu.'Dim sglValue Jako jedensglValue = 555968541'převeďte singl na řetězec se symbolem měny.'strPhone = Formát (sglValue, "(000) -000 0000")'zobrazit výsledekMsgBox strPhoneEnd Sub

vrátí tento výsledek:

wave wave wave wave wave