Cum se folosește funcția VBA LBound Array? (cu exemple)

Funcția Excel VBA LBound

LBound în VBA înseamnă „Lower Bound”, adică va extrage cel mai mic număr dintr-o matrice. De exemplu, dacă matricea spune „Dim ArrayCount (2 la 10) ca Șir”, folosind funcția LBound putem găsi cel mai mic număr din lungimea matricei, adică 2.

Mai jos este sintaxa funcției LBound. Este foarte simplu și ușor; are doar doi parametri.

Lbound (Array name (, dimension))
  • Nume matrice: Acesta este primul argument. Pentru acest parametru, trebuie să specificăm numele matricei, care este utilizată pentru a defini matricea.
  • (Dimensiune): Dacă matricea este o singură dimensiune, aceasta nu este necesară. În mod implicit, este nevoie de unul sau altfel trebuie să furnizăm numărul dimensiunii.

Deci, folosind aceste funcții, putem găsi lungimea minimă a unui tablou.

Cum se utilizează funcția VBA LBound? (Exemplu)

Exemplul nr. 1

De exemplu, uitați-vă la codul de mai jos.

Cod:

Sub LBound_Example1 () Dim Count (2 până la 5) Ca număr întreg MsgBox LBound (Count) End Sub

În codul de mai sus, am definit matricea ca întreg și dimensiunea matricei de la 2 la 5. Apoi, am atribuit caseta de mesaj VBA pentru a afișa cea mai mică lungime a matricei utilizând funcția LBound.

Când rulăm codul, vom obține rezultatul de mai jos într-o casetă de mesaj.

Ieșire:

Deoarece matricea noastră începe de la 2, funcția LBound determină cea mai mică lungime a matricei ca 2.

Exemplul nr. 2

Acum, uitați-vă la codul de mai jos.

Cod:

Sub LBound_Example2 () Dim Count (5) Ca număr întreg MsgBox LBound (Count) End Sub

În cele de mai sus, nu ne-am decis cu privire la limita cea mai mică. Mai degrabă tocmai am furnizat lungimea matricei ca 5 acum. Să rulăm codul și să vedem cea mai mică lungime a valorii.

Ieșire:

A returnat rezultatul ca 0, deoarece atunci când nu decidem începutul și punctul final al unui tablou, furnizați mai degrabă numărul static, de exemplu, „Număr (5), adică, în acest caz, valoarea matricei începând de la 0, nu de la 1. Deci putem stoca acum un total de 6 valori în el.

Număr (0), Număr (1), Număr (2), Număr (3), Număr (4), Număr (5).

Exemplul nr. 3

Acum vom folosi gama de date și vom decide limita inferioară din gama de date. De exemplu, uitați-vă la imaginea de date de mai jos.

Din acest interval, vom decide cea mai mică și cea mai mare dimensiune a rândului.

Mai întâi, definiți variabila ca variantă.

Cod:

Sub LBound_Example3 () Dim Rng As Variant End Sub

Pentru această variabilă variantă „Rng”, setați valoarea de referință a intervalului ca „Range („ B2: B5 ”). Valoare.”

Cod:

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

Pentru acest interval, vom găsi cea mai mică și cea mai mare lungime a matricei. Deschideți caseta de mesaje și funcția LBound și furnizați numele variabilei.

Cod:

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

Acum executați codul VBA și vedeți cea mai mică valoare din lungime.

Ieșire:

Acum schimbați referința variabilei din B2: B5 în A2: B5.

Pentru acest interval, vom găsi valorile limită inferioară și limită superioară.

Cod:

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

Deoarece avem mai multe matrice de dimensiuni, trebuie să furnizăm și numărul dimensiunii.

Cod:

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:

Pentru prima dimensiune, limita inferioară este 1, iar limita superioară este 4.

Faceți clic pe „Ok” pentru a obține următoarele limite de dimensiune.

Ieșire:

Pentru a doua dimensiune, limita inferioară este 1, iar limita superioară este 2.

Lucruri de reținut aici

  • Funcția LBound returnează lungimea minimă din matrice.
  • Când lungimea matricei este statică, adică un singur număr, atunci matricea începe întotdeauna de la numărul 0, nu de la 1.
  • În cazul unei matrice multidimensionale, trebuie să specificăm numărul dimensiunii.

Articole interesante...