Typ s jednou premennou
VBA Single dátový typ sa používa na ukladanie čísel, ktoré vyžadujú desatinné miesta. Môže uložiť od -3,4028235E+38 do -1,401298E -45 pre záporné hodnoty a od 1,401298E -45 do 3,4028235E+38 pre kladné hodnoty.
Ak chcete deklarovať jednu premennú, použite príkaz Dim (skratka pre dimenziu):
| 1 | Dim sngA ako single |
Potom na priradenie hodnoty premennej jednoducho použite znamienko rovnosti:
| 1 | sngA = 3658,25 |
Uvedenie do postupu vyzerá takto:
| 12345678 | Sub sngPriklad ()'deklarujte dvojitú premennúDim sngA ako single“vyplňte dvojitú premennúsngA = 3658,25“Zobraziť pole so správouMsgBox sngAKoniec pod |
Ak spustíte kód uvedený vyššie, zobrazí sa nasledujúce okno so správou.
Dvojitý dátový typ
Dátový typ Double je len dlhšou verziou súboru Single Dátový typ. Vďaka tejto skutočnosti môže mať vplyv na zaokrúhľovanie, ak sa používa v postupe ako Single dátový typ sa zaokrúhli na 4 desatinné miesta, zatiaľ čo Dvojité typ údajov sa zaokrúhli na 12 desatinných miest. Ak potrebujete viac ako 4 desatinné miesta, môžete použiť typ údajov Double.
Interné alebo dlhé typy údajov
Ak nepotrebujete desatinné miesto, môžete použiť dátový typ Int alebo dlhý.
| 1 | Dim intA ako celé číslo |
| 1 | Dim lngB ako dlhé |
Programovanie VBA | Generátor kódu pracuje za vás!
Deklarujte jednu premennú na modulovej alebo globálnej úrovni
V predchádzajúcich príkladoch sme deklarovali súbor Single premenná v rámci procedúry. Premenné deklarované pomocou postupu je možné použiť iba v rámci tohto postupu.
Namiesto toho môžete deklarovať jednotlivé premenné na úrovni modulu alebo na globálnej úrovni.
Úroveň modulu
Úroveň modulu premenné sú deklarované v hornej časti modulov kódu pomocou Dim vyhlásenie.
Tieto premenné je možné použiť s akýmkoľvek postupom v tomto module kódu.
Globálna úroveň
Globálna úroveň premenné sú tiež deklarované v hornej časti modulov kódu. Avšak namiesto použitia Dim vyhlásenie, použite príponu Verejné vyhlásenie, ktoré naznačuje, že Single premenná je k dispozícii na použitie vo vašom projekte VBA.
| 1 | Verejný SngA ako slobodný |
Ak by ste mali vyhlásiť Single premennej na úrovni modulu a potom ju skúste použiť v inom module, vyskytne sa chyba.
Ak ste však na deklarovanie súboru použili kľúčové slovo Public Single premenná, chyba by nenastala a postup by prebehol perfektne.
Ste unavení z hľadania príkladov kódu VBA? Skúste AutoMacro!
Jediný formát uložený ako reťazec
Je možné, že budete chcieť naformátovať jeden typ údajov na reťazec - napríklad budete chcieť zobraziť symbol meny a zaokrúhliť číslo na 2 desatinné miesta.
Aby ste to dosiahli, použite funkciu Formát.
Nasledujúci postup
| 1234567891011 | Sub TestSingleToCurrencyString ()'deklarujte premennú reťazcaDim strMoney ako reťazec'Deklarujte singel a vyplňte hodnotuDim sngValue as SinglesngValue = 44055.256'skonvertujte singel na reťazec so symbolom meny s 2 desatinnými miestamistrMoney = Formát (sngValue, "$#, ## 0,00")'pozrite si výsledokMsgBox strMoneyKoniec pod |
vráti tento výsledok:
Podobne môžete chcieť zobraziť číslo ako formátované telefónne číslo.
Tento postup:
| 1234567891011 | Sub TestSingleToPhone ()'deklarujte premennú reťazcaDim strPhone ako reťazec'Deklarujte singel a vyplňte hodnotuDim sglValue Ako jedensglValue = 555968541'skonvertujte singel na reťazec so symbolom menystrPhone = Formát (sglValue, "(000) -000 0000")'pozrite si výsledokMsgBox strPhoneKoniec pod |
vráti tento výsledok:
