Как да използвам функцията VBA LBound Array? (с примери)

Excel VBA LBound функция

LBound във VBA означава „Долна граница“, т.е. ще извлече най-малкия брой на масив. Например, ако масивът казва „Dim ArrayCount (2 до 10) като String“, тогава с помощта на функцията LBound можем да намерим най-малкото число на дължината на масива, т.е. 2.

По-долу е синтаксисът на функцията LBound. Това е много просто и лесно, има само два параметъра.

Lbound (Име на масив [, измерение])
  • Име на масив: Това е първият аргумент. За този параметър трябва да посочим името на масива, който се използва за дефиниране на масива.
  • [Измерение]: Ако масивът е едно измерение, тогава това не е задължително, по подразбиране е необходимо едно или иначе трябва да предоставим номера на измерението.

Така че, използвайки тези функции, можем да намерим минималната дължина на масив.

Как да използвам функцията VBA LBound? (Пример)

Можете да изтеглите този шаблон на VBA LBound Excel тук - VBA LBound Excel шаблон

Пример # 1

За пример вижте кода по-долу.

Код:

 Sub LBound_Example1 () Dim Count (2 до 5) Като Integer MsgBox LBound (Count) End Sub 

В горния код дефинирахме масива като цяло число и размер на масива от 2 до 5. След това зададохме полето за съобщения VBA да показва най-ниската дължина на масива, като използваме функцията LBound.

Когато стартираме кода, ще получим резултата по-долу в поле за съобщение.

Изход:

Тъй като нашият масив започва от 2, функцията LBound определя най-ниската дължина на масива като 2.

Пример # 2

Сега вижте кода по-долу.

Код:

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

В горното не сме решили най-ниската граница, а просто предоставихме дължината на масива като 5, сега нека пуснем кода и ще видим най-малката дължина на стойността.

Изход:

Той е върнал резултата като 0, защото когато не решим началната и крайната точка на масив, по-скоро предоставяме статичното число, например „Count (5), т.е. в този случай стойността на масива започва от 0, а не от 1. Така че ние може да съхранява в него общо 6 стойности сега.

Брой (0), Брой (1), Брой (2), Брой (3), Брой (4), Брой (5).

Пример # 3

Сега ще използваме диапазон от данни и ще решим долната граница от диапазона от данни. За пример погледнете изображението с данни по-долу.

От този диапазон ще решим най-ниския и най-големия размер на реда.

Първо дефинирайте променливата като вариант.

Код:

 Sub LBound_Example3 () Dim Rng As Variant End Sub 

За тази променлива на варианта „Rng“ задайте референтната стойност на диапазона като „Обхват („ B2: B5 “). Стойност“.

Код:

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

За този диапазон ще намерим най-ниската и най-голямата дължина на масива. Отворете полето за съобщения и функцията LBound и въведете името на променливата.

Код:

 Sub LBound_Example3 () Dim Rng As Variant Rng = Range ("B2: B5"). Стойност MsgBox LBound (Rng) End Sub 

Сега стартирайте VBA кода и вижте най-ниската стойност от дължината.

Изход:

Сега променете референцията на променливата от B2: B5 на A2: B5.

За този диапазон ще намерим стойностите на долната граница и горната граница.

Код:

 Sub LBound_Example3 () Dim Rng As Variant Rng = Range ("A2: B5"). Стойност Край Sub 

Тъй като имаме повече от един масив с измерения, трябва да предоставим и номера на измерението.

Код:

 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.