Kako se koristi funkcija VBA LBound Array? (s primjerima)

Funkcija Excel VBA LBound

LBound u VBA znači "Donja granica", tj. Izdvojit će najmanji broj niza. Na primjer, ako niz kaže “Dim ArrayCount (2 do 10) kao String”, tada pomoću funkcije LBound možemo pronaći najmanji broj duljine niza, tj. 2.

Ispod je sintaksa funkcije LBound. Vrlo je jednostavno i lako; ima samo dva parametra.

Duljina (naziv polja (, dimenzija))
  • Naziv polja: Ovo je prvi argument. Za ovaj parametar moramo odrediti ime niza koje se koristi za definiranje niza.
  • (Dimenzija): Ako je niz pojedinačne dimenzije, to nije potrebno. Prema zadanim postavkama potreban je jedan, inače moramo navesti broj dimenzije.

Dakle, pomoću ovih funkcija možemo pronaći minimalnu duljinu niza.

Kako koristiti funkciju VBA LBound? (Primjer)

Primjer # 1

Na primjer, pogledajte donji kod.

Kodirati:

Sub LBound_Example1 () Dim Count (2 to 5) Kao Integer MsgBox LBound (Count) End Sub

U gornjem kodu definirali smo niz kao cijeli broj, a veličinu niza od 2 do 5. Zatim smo dodijelili okvir za poruku VBA da prikazuje najmanju duljinu niza pomoću funkcije LBound.

Kada pokrenemo kôd, dobit ćemo donji rezultat u okviru s porukom.

Izlaz:

Budući da je naš niz započet od 2, funkcija LBound određuje najmanju duljinu niza kao 2.

Primjer # 2

Sada pogledajte kod u nastavku.

Kodirati:

Sub LBound_Example2 () Dim Count (5) Kao Integer MsgBox LBound (Count) End Sub

U gore navedenom nismo se odlučili za najnižu granicu. Umjesto da smo upravo naveli dužinu polja kao 5 sada. Pokrenimo kôd i vidimo najmanju duljinu vrijednosti.

Izlaz:

Rezultat je vratio kao 0, jer kad ne odlučimo o početnoj i krajnjoj točki niza, radije navedite statički broj, na primjer, „Count (5), tj., U ovom slučaju, vrijednost niza koja počinje od 0, a ne od 1. Dakle, u njega sada možemo pohraniti ukupno 6 vrijednosti.

Broj (0), Broj (1), Broj (2), Broj (3), Broj (4), Broj (5).

Primjer # 3

Sada ćemo koristiti raspon podataka i odrediti donju granicu iz raspona podataka. Na primjer, pogledajte donju podatkovnu sliku.

Iz ovog raspona odlučit ćemo najmanju i najveću veličinu retka.

Prvo definirajte varijablu kao varijantu.

Kodirati:

Sub LBound_Example3 () Dim Rng Kao varijanta Kraj Sub

Za ovu varijablu varijante „Rng“, postavite referentnu vrijednost raspona kao „Raspon („ B2: B5 “). Vrijednost.“

Kodirati:

Sub LBound_Example3 () Dim Rng As Variant Rng = Raspon ("B2: B5"). Vrijednost Kraj Sub

Za ovaj ćemo raspon pronaći najmanju i najveću duljinu polja. Otvorite okvir za poruke i funkciju LBound i unesite ime varijable.

Kodirati:

Sub LBound_Example3 () Dim Rng As Variant Rng = Range ("B2: B5"). Vrijednost MsgBox LBound (Rng) End Sub

Sada pokrenite VBA kod i pogledajte najmanju vrijednost iz duljine.

Izlaz:

Sada promijenite referencu varijable iz B2: B5 u A2: B5.

Za ovaj ćemo raspon pronaći vrijednosti donje i gornje granice.

Kodirati:

Sub LBound_Example3 () Dim Rng As Variant Rng = Raspon ("A2: B5"). Vrijednost Kraj Sub

Budući da imamo više od jednog niza dimenzija, moramo unijeti i broj dimenzija.

Kodirati:

Sub LBound_Example3() Dim Rng As Variant Rng = Range("A2:B5").Value MsgBox LBound(Rng, 1) End Sub

To find the first column first lower bound above code will help, similarly to find the upper bound in this first column below code will help.

Code:

Sub LBound_Example3() Dim Rng As Variant Rng = Range("A2:B5").Value MsgBox LBound(Rng, 1) & vbNewLine & UBound(Rng, 1) End Sub

This will find the first column lower length and upper length. Similarly, in the next line, write one more message box but this time, change the dimension from 1 to 2.

Code:

Sub LBound_Example3() Dim Rng As Variant Rng = Range("A2:B5").Value MsgBox LBound(Rng, 1) & vbNewLine & UBound(Rng, 1) MsgBox LBound(Rng, 2) & vbNewLine & UBound(Rng, 2) End Sub

Run the code and see the result in the message box.

Output:

Za prvu dimenziju donja granica je 1, a gornja granica 4.

Kliknite "U redu" da biste dobili sljedeća ograničenja dimenzija.

Izlaz:

Za drugu dimenziju donja granica je 1, a gornja granica 2.

Stvari koje treba ovdje zapamtiti

  • LBound funkcija vraća minimalnu duljinu iz niza.
  • Kada je duljina niza statična, tj. Jedan broj, tada niz uvijek započinje s broja 0, a ne s broja 1.
  • U slučaju višedimenzionalnog niza, moramo odrediti broj dimenzije.

Zanimljivi članci...