Екцел ВБА ЛБоунд функција
ЛБоунд у ВБА значи „Доња граница “, тј. Извући ће најмањи број низа. На пример, ако низ каже „Дим АрраиЦоунт (2 до 10) као Стринг“, онда помоћу функције ЛБоунд можемо пронаћи најмањи број дужине низа, тј. 2.
Испод је синтакса функције ЛБоунд. Врло је једноставно и лако; има само два параметра.
Лбоунд (Назив низа (, димензија))
- Име низа: Ово је први аргумент. За овај параметар треба да одредимо име низа које се користи за дефинисање низа.
- (Димензија): Ако је низ појединачне димензије, то није потребно. Подразумевано је потребан један, или у супротном требамо навести број димензије.
Дакле, користећи ове функције, можемо пронаћи минималну дужину низа.
Како се користи функција ВБА ЛБоунд? (Пример)
Пример # 1
На пример, погледајте доњи код.
Шифра:
Суб ЛБоунд_Екампле1 () Дим Цоунт (2 то 5) Као Интегер МсгБок ЛБоунд (Цоунт) Енд Суб
У горњем коду дефинирали смо низ као цео број, а величину низа од 2 до 5. Даље, доделили смо поље ВБА поруке да приказује најмању дужину низа помоћу функције ЛБоунд.
Када покренемо код, добићемо доњи резултат у оквиру за поруку.
Излаз:
Пошто је наш низ почев од 2, функција ЛБоунд одређује најмању дужину низа као 2.
Пример # 2
Сада погледајте доњи код.
Шифра:
Суб ЛБоунд_Екампле2 () Дим Цоунт (5) Као Интегер МсгБок ЛБоунд (Цоунт) Енд Суб
У наведеном, нисмо се одлучили за најнижу границу. Уместо да смо управо дали дужину низа као 5 сада. Покренимо код и видећемо најмању дужину вредности.
Излаз:
Резултат је вратио као 0, јер када не одлучимо о почетној и крајњој тачки низа, радије наведите статички број, на пример, „Цоунт (5), тј., У овом случају, вредност низа која почиње од 0, а не од 1. Дакле, у њега сада можемо да сместимо укупно 6 вредности.
Број (0), Број (1), Број (2), Број (3), Број (4), Број (5).
Пример # 3
Сада ћемо користити опсег података и одредити доњу границу из опсега података. На пример, погледајте доњу слику података.
Из овог опсега одлучићемо најмању и највећу величину реда.
Прво дефинишите променљиву као варијанту.
Шифра:
Суб ЛБоунд_Екампле3 () Дим Рнг Као варијанта Крај Суб
За ову варијаблу варијанте „Рнг“, поставите референтну вредност опсега као „Распон („ Б2: Б5 “). Вредност.“
Шифра:
Суб ЛБоунд_Екампле3 () Дим Рнг Ас Вариант Рнг = Ранге ("Б2: Б5"). Валуе Енд Суб
За овај опсег наћи ћемо најмању и највећу дужину низа. Отворите оквир за поруке и функцију ЛБоунд и унесите име променљиве.
Шифра:
Суб ЛБоунд_Екампле3 () Дим Рнг Ас Вариант Рнг = Ранге ("Б2: Б5"). Вредност МсгБок ЛБоунд (Рнг) Енд Суб
Сада покрените ВБА код и погледајте најмању вредност дужине.
Излаз:
Сада промените референцу променљиве са Б2: Б5 на А2: Б5.
За овај опсег пронаћи ћемо вредности доње и горње границе.
Шифра:
Суб ЛБоунд_Екампле3 () Дим Рнг Ас Вариант Рнг = Ранге ("А2: Б5"). Валуе Енд Суб
С обзиром на то да имамо више низова димензија, морамо да наведемо и број димензије.
Шифра:
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:
За прву димензију доња граница је 1, а горња граница 4.
Кликните на „Ок“ да бисте добили следећа ограничења димензија.
Излаз:
За другу димензију доња граница је 1, а горња граница 2.
Ствари које треба овде запамтити
- ЛБоунд функција враћа минималну дужину из низа.
- Када је дужина низа статична, тј. Један број, тада низ увек почиње од броја 0, а не од броја 1.
- У случају вишедимензионалног низа, морамо одредити број димензије.
