Ez az oktatóanyag bemutatja, hogyan kell használni a CLng VBA függvényt egy kifejezés hosszú egész adattípusra konvertálásához.
CLng funkció
VBA CLng Átalakítás Expression hosszú
A VBA CLng funkcióval kifejezések alakíthatók át hosszú adattípusokká a VBA kódon belül.
123456 | CLngExample_1 alrész ()MsgBox CLng (12.34) 'Az eredmény: 12MsgBox CLng (12.345) 'Az eredmény: 12MsgBox CLng (-124) 'Az eredmény: -124MsgBox CLng (-12.34) 'Az eredmény: -12End Sub |
VBA CLng Kerekítés
A VBA CLng függvény kerekíti a számtípus vagy számszerű kifejezés tizedes részét. Ez azonban nem minden esetben kerekedik helyesen. Ha a tizedes rész 0,5, akkor a VBA CLng függvény a legközelebbi páros egész számot adja vissza.
1234567891011 | CLngExample_2 ()MsgBox CLng (0.34) 'Az eredmény: 0MsgBox CLng (0.99) 'Az eredmény: 1MsgBox CLng (-124,95) 'Az eredmény: -125MsgBox CLng (1.5) 'Az eredmény: 2MsgBox CLng (2.5) 'Az eredmény: 2End Sub |
Hozzáadhatunk egy tizedes számot viszonylag kicsivel a várt tizedes értékhez, hogy megváltoztassuk a VBA CLng függvény viselkedését az elvárthoz.
1234567891011 | CLngExample_3 alrész ()MsgBox CLng (2.5)'Az eredmény: 2MsgBox CLng (2,5 + 0,001)'Az eredmény: 3MsgBox CLng (14.5)'Az eredmény: 14MsgBox CLng (14,5 + 0,001)'Az eredmény: 15End Sub |
VBA programozás | A kódgenerátor működik az Ön számára!
VBA CLng karakterláncok hosszúká alakítása
A VBA CLng függvény használható a karakterláncok hosszúsá alakítására, ha a karakterlánc karaktereinek számértékük van.
123456789101112131415161718 | CLngExample_4 alrész ()Dim StrEx karakterlánckéntStrEx = "112"MsgBox CLng (StrEx)'Az eredmény: 112StrEx = "112,3"MsgBox CLng (StrEx)'Az eredmény: 112 112,3 kerekítveStrEx = "11,2"MsgBox CLng (StrEx)'Az eredmény: 112, figyelmen kívül hagyjaStrEx = "$ 112"MsgBox CLng (StrEx)'Az eredmény: a 112 dollárt figyelmen kívül hagyjaEnd Sub |
VBA CLng Run-Time Error 13 Type Mismatch
Ha a VBA CLng függvényt olyan karakterláncokkal használja, amelyek nem numerikus karaktereket vagy olyan karaktereket tartalmaznak, amelyeknek nincs értelme a numerikus kontextusban, akkor a futásidejű hiba '13' lesz: A típus nem egyezik.
1234567 | CLngExample_5 alrész ()'Az alábbi kód ERROR üzenetet eredményez'A CLng nem tudja kezelni a nem numerikus karaktereketDim StrEx karakterlánckéntStrEx = "Ab13"MsgBox CLng (StrEx)End Sub |
VBA CLng Run-Time Error 6 Overflow
Ha a VBA CLng függvényt olyan karakterláncokkal használja, amelyek a várt egésznél kisebb vagy nagyobb értéket eredményeznek, a Run-Time error ’6’ (túlcsordulás) lép fel. Az excelben található egész adattípus várható értéke -2 147 483 648 és 2 147 483 647 között van.
1234567 | CLngExample_6 alrész ()'Az alábbi kód ERROR üzenetet eredményez'A CLng nem képes nem numerikus karakterek kezeléséreDim StrEx karakterlánckéntStrEx = "2147483648"MsgBox CLng (StrEx)End Sub |
Unod már a VBA kódpéldák keresését? Próbálja ki az AutoMacro -t!
VBA CLng Regionális beállítások
A VBA CLng függvény különböző viselkedést konvertáló karakterláncokat tartalmaz vesszővel vagy ponttal. Az operációs rendszer regionális beállításait használja a tizedes elválasztáshoz és a számjegy elválasztáshoz.
12345678910111213141516 | CLngExample_7 alrész ()Dim StrEx karakterlánckéntStrEx = "1,9"MsgBox CLng (StrEx)„Ha a regionális beállítások rendelkeznek, csoportosító elválasztóként'Az eredmény: 19„Ha a regionális beállítások rendelkeznek, akkor tizedes elválasztónak kell lennie'Az eredmény: 2 (2, mert 1,9 kerekít)StrEx = "1,9"MsgBox CLng (StrEx)„Ha a regionális beállítások rendelkeznek. csoportosító elválasztóként akkor'Az eredmény: 19„Ha a regionális beállítások rendelkeznek. tizedes elválasztóként akkor'Az eredmény: 2 (2, mert 1,9 kerekít)End Sub |
VBA programozás | A kódgenerátor működik az Ön számára!
VBA CLng A logikai értékek hosszúsá konvertálása
A VBA CLng függvény a logikai változókat hosszúvá alakíthatja. Ha az értékelt kifejezés igaz, akkor a kapott hosszú -1, ha az értékelt kifejezés hamis, a kapott hosszú 0.
1234567891011121314 | CLngExample_8 alrész ()Dim BoolEx mint BooleanBoolEx = IgazMsgBox CLng (BoolEx)'Az eredmény: -1MsgBox CLng (2 = 2)'Az eredmény: -1BoolEx = HamisMsgBox CLng (BoolEx)'Az eredmény: 0MsgBox CLng (1 = 2)'Az eredmény: 0End Sub |
VBA CLng Dátumok hosszúsá konvertálása
A VBA CLng függvény egy dátumváltozót hosszúvá alakíthat. A visszaadott érték az Excel belső száma, dátum tárolására kerekítve. Ha ez a szám kívül esik a VBA várható hosszú határértékein, akkor futásidejű hibát kapunk ’6’: Túlcsordulás.
123456789101112 | CLngExample_9 alrész ()Dim DateEx dátumkéntDateEx = 1940.03.03.MsgBox CLng (DateEx)Az eredmény: 14644DateEx = 1964.07.07.MsgBox CLng (DateEx)Az eredmény: 23596DateEx = 1934.07.07. 11:32:04 #MsgBox CLng (DateEx)Az eredmény: 12485End Sub |