Excel VBA INT (Integer) funkcija
VBA INT je ugrađena funkcija koja se koristi za dobivanje samo cjelobrojnog dijela broja koji nam daje ulaz, a ova se funkcija koristi u onim podacima čiji decimalni dio ne utječe toliko na podatke da bi olakšao izračune ili analizu koju koristimo INT funkcija za dobivanje samo cjelobrojnih vrijednosti.
Ova je funkcija dostupna na radnom listu kao i u VBA-u. Integer funkcija zaokružuje određeni broj na najbliži cjelobrojni broj.
VBA Int funkcija može se koristiti u potprocedurama i postupcima funkcija. Sada pogledajte sintaksu funkcije INT u VBA.
Ima samo jedan argument za navođenje, tj. Number.
- Broj je broj koji pokušavamo pretvoriti u INTEGER broj. Kada se navede broj, funkcija INT zaokružuje ga na najbliži cijeli broj.
Na primjer, ako je isporučeni broj 68,54, tada se funkcija Excel VBA Int zaokružuje na 68, što je prema nuli. Ako je isporučeni broj -68,54, tada je funkcija INT zaokružila broj na 69, što je daleko od nule.
Kako koristiti VBA INT funkciju?
Primjer # 1
Sada pogledajte jednostavni primjer funkcije “INT” u VBA. Izvršimo zadatak zaokruživanja broja 84,55 na najbliži cijeli broj.
Korak 1: Pokrenite potpostupak.
Korak 2: Proglasite varijablu kao Integer .
Kodirati:
Pod INT_Primjer1 () Zatamni K Kao cjelovito Kraj Kraj
Korak 3: Sada dodijelite formulu varijabli " k " primjenom funkcije INT.
Kodirati:
Pod INT_Primjer1 () Dim K Kao cijeli broj K = Int (Kraj Sub
Korak 4: Navedite broj kao 84,55 .
Napomena: Budući da je riječ o numeričkom broju, ne trebamo navoditi dvostruke navodnike.
Kodirati:
Sub INT_Primjer1 () Dim K Kao cijeli broj K = Int (84,55) Kraj Sub
Korak 5: Sada prosljeđivanje rezultata varijable u okvir VBA poruke.
Kodirati:
Pod INT_Primjer1 () Dim K Kao cjelina K = Int (84,55) MsgBox K Kraj Sub
Ok, pokrenimo kod i vidjet ćemo što će se dogoditi.
Dakle, rezultat je 84 i zaokružen je na najbližu cjelobrojnu vrijednost.
Primjer # 2
Sada ćemo s istim brojem s negativnim predznakom pokušati pretvoriti u najbližu cjelobrojnu vrijednost. Ispod je kod s negativnim predznakom.
Kodirati:
Sub INT_Example2 () Dim k As Integer k = Int (-84.55) 'Negativan broj s INT funkcijom MsgBox k End Sub
Kad pokrenem ovaj kod, zaokružio je broj na -85 .
Primjer # 3 - Izdvajanje dijela datuma iz datuma i vremena
Nekoliko puta u svojoj karijeri susreo sam se sa scenarijem izdvajanja datuma i vremena odvojeno od kombinacije datuma i vremena.
Na primjer, pogledajte dolje navedene podatke o datumu i vremenu.
Kako izdvajate porciju datuma i vrijeme?
Prvo, moramo izdvojiti dio Date. Za to primijenimo funkciju INT. Kôd u nastavku izdvojit će DATUM dio iz gornjih podataka.
Kodirati:
Sub INT_Example2 () Dim k kao cjelobrojno za k = 2 do 12 ćelija (k, 2) .Vrijednost = Int (ćelije (k, 1) .Vrijednost) 'Ovo će izdvojiti datum u drugi stupac Ćelije (k, 3). Vrijednost = Ćelije (k, 1) .Vrijednost - Ćelije (k, 2) .Vrijednost 'Ovo će izdvojiti vrijeme do trećeg stupca Sljedeći k Kraj Sub
Pokrenite ovaj kod. Mogli biste dobiti rezultat kao u nastavku (ako formatiranje nije primijenjeno).
U stupcu datuma primijenite oblikovanje kao “DD-MMM-GGGG”, a za stupac vremena primijenite format datuma u excelu kao “HH: MM: SS AM / PM”
