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 jednostavan i lagan, ima samo dva parametra.

Duljina (naziv polja [, dimenzija])

• Naziv polja: Ovo je prvi argument. Za ovaj parametar moramo odrediti ime niza koji se koristi za definiranje niza.
• [Dimenzija]: Ako je niz jedna dimenzija, tada to nije potrebno, prema zadanim postavkama potrebna je jedna ili inače trebamo navesti broj dimenzije.

Dakle, pomoću ove funkcije možemo pronaći minimalnu duljinu niza.

Kako koristiti funkciju VBA LBound? (Primjer)

Ovaj VBA LBound Excel predložak možete preuzeti ovdje - VBA LBound Excel Predložak

Primjer # 1

Za 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 poruke 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 odlučili najnižu granicu, nego smo samo naveli duljinu 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 navedimo statički broj, na primjer, „Count (5), tj. U ovom slučaju vrijednost niza počinje od 0, a ne od 1. Dakle, mi u nju sada može 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. Za primjer pogledajte donju sliku podataka.

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, trebamo navesti i dimenzijski broj.

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:

For the first dimension lower bound is 1 and the upper bound is 4.

Click on “Ok” to get the next dimension limits.

Output:

For the second dimension lower limit is 1 and the upper limit is 2.

Things to Remember here

• LBound function returns the minimum length from the array.
• When the array length static i.e. single number then array always starts from the number 0 not from 1.
• In the case of a multi-dimensional array, we need to specify the dimension number.