Excel VBA INT (egész szám) függvény
A VBA INT egy beépített függvény, amelyet arra használunk, hogy csak egy szám egész részét adjuk meg, ha megadta a számot. Ezt a függvényt azokban az adatokban használjuk, amelyek tizedes része nem annyira befolyásolja az adatokat, hogy megkönnyítsük az általunk használt számításokat vagy elemzéseket Az INT függvény csak az egész értékek lekérésére.
Ez a funkció elérhető a munkalapon, valamint a VBA-ban. Az Egész függvény egy adott számot a legközelebbi egész számra kerekít.
A VBA Int függvény használható az Alfolyamat és a Funkcióeljárás részben. Most vessen egy pillantást az INT függvény szintaxisára a VBA-ban.
Csak egy argumentuma van a szám megadására .
- A szám az a szám, amelyet megpróbálunk INTEGER számra konvertálni. A szám megadásakor az INT függvény lefelé kerekíti a legközelebbi egész számra.
Például, ha a megadott szám 68,54, akkor az Excel VBA Int függvény lefelé kerekszik 68-ig, ami nulla felé mutat. Ha a megadott szám -68,54, akkor az INT függvény kerekíti a számot 69-re, ami nulla.
Hogyan kell használni a VBA INT függvényt?
1. példa
Most nézzük meg a VBA „INT” funkciójának egyszerű példáját. Végezzük el a feladatot, hogy a 84.55 számot kerekítsük a legközelebbi egész számra.
1. lépés: Indítsa el az alfolyamatot.
2. lépés: Nyújtsa be a változót egész számnak .
Kód:
INT_Példa1 () Dim K egész szám végként Sub
3. lépés: Most rendelje hozzá a képletet a „ k ” változóhoz az INT függvény alkalmazásával.
Kód:
INT_Példa1 () Dim K mint egész K = Int (End Sub
4. lépés: Adja meg a számot: 84.55 .
Megjegyzés: Mivel ez egy numerikus szám, nem kell dupla idézőjeleket megadnunk.
Kód:
INT_Példa1 () Dim K mint egész K = Int (84.55) End Sub
5. lépés: Most átadja a változó eredményét a VBA üzenetmezőben.
Kód:
INT_Példa1 () Dim K mint egész K = Int (84.55) MsgBox K End Sub
Ok, futtassuk a kódot, és nézzük meg, mi történik.
Tehát az eredmény 84, és lefelé kerekíti a legközelebbi egész értékre.
2. példa
Most ugyanazzal a számmal a negatív előjellel megpróbálunk a legközelebbi egész értékre konvertálni. Az alábbiakban a negatív előjellel ellátott kód található.
Kód:
INT_Példa2 () Dim k As Integer k = Int (-84.55) 'Negatív szám INT függvénnyel MsgBox k End Sub
Amikor futtatom ezt a kódot, a számot kerekítésre kerekítette -85-re .
3. példa - Dátumrészlet kibontása a Dátum és Időből
Pályafutásom során kevés alkalommal találkoztam azzal a forgatókönyvvel, hogy a dátumot és az időt a Dátum és idő kombinációjától külön választottam ki.
Nézze meg például a Dátum és idő alábbi adatait.
Hogyan vonható ki a dátum és az idő?
Először ki kell húznunk a Dátum részt. Ehhez alkalmazzuk az INT függvényt. Az alábbi kód kivonja a DATE részt a fenti adatokból.
Kód:
INT_Példa2 () Dim k mint egész szám k = 2-től 12 celláig (k, 2). Érték = Int (Cells (k, 1). Érték) "Ez kivonja a dátumot a cellák második oszlopába (k, 3). Érték = Cellák (k, 1). Érték - Cellák (k, 2). Érték "Ez kivonja az időt a harmadik oszlopig Következő k End Sub
Futtassa ezt a kódot. Az alábbiakhoz hasonló eredményt kaphat (ha a formázást nem alkalmazzák).
A dátum oszlopban alkalmazza a formátumot „NN-HH-ÉÉÉÉ” néven , az idő oszlopra pedig a dátumformátumot excel formában: „ÓÓ: HH: SS AM / PM”
