Величина низа ВБА - Водич корак по корак са примерима

Преглед садржаја

Како пронаћи величину низа помоћу ВБА кода?

У овом чланку пружамо детаљни водич за проналажење величине низа помоћу ВБА кода.

Како пронаћи величину низа помоћу ВБА кода?

Следите кораке за проналажење величине низа помоћу Екцел ВБА кода.

Корак 1: Почнимо са основним, прогласимо променљиву у ВБА као тип података варијанте.

Шифра:

Суб Арраи_Сизе () Затамни МиАрраи као варијанту Крај Суб

Корак 2: За ову променљиву користите функцију АРРАИ и доделите неке вредности као што је приказано доле.

Шифра:

Суб Арраи_Сизе () Затамни МиАрраи као варијанту МиАрраи = Арраи ("Јан", "Феб", "Мар", "Апр", "Маи", "Јун", "Јул") Енд Суб

Корак 3: Ок, доделили смо неке вредности имену низа „МиАрраи“.

Претпоставимо да ако треба да напишемо петљу да бисмо ове вредности низа ускладиштили у ћелије, онда морамо да одлучимо колико пута петља мора да се изврши. Ово зависи од броја вредности које низ има.

Ок, сада погледајте број вредности додељених имену низа „МиАрраи“, низу је додељено укупно 7 вредности, тако да сада знамо колико пута петља мора да се покрене да би се вредности низа чувале у ћелијама .

Корак 4: Прогласите другу променљиву целим бројем за писање ФОР петље у ВБА.

Шифра:

Суб Арраи_Сизе () Дим МиАрраи Ас Вариант МиАрраи = Арраи ("Јан", "Феб", "Мар", "Апр", "Маи", "Јун", "Јул") Дим к Као целобројни за к = 1 до 7 Следеће к Крај Суб

Корак 5: Ето, отворили смо петљу ФОР, почевши од 1 до 7, унутар петље упишите својство ЦЕЛЛС за чување као што је приказано доле.

Шифра:

Суб Арраи_Сизе () Дим МиАрраи Ас Вариант МиАрраи = Арраи ("Јан", "Феб", "Мар", "Апр", "Маи", "Јун", "Јул") Дим к Као целобројни за к = 1 до 7 Ћелије (к, 1) .Вредност = МиАрраи (к) Следећи к Крај Суб

Корак 6: Ок, сада извршите кодни ред по ред притиском на функцијски тастер Ф8. Првим притиском на тастер Ф8 покренуће макро.

Корак 7: Притисните Ф8 сада ће скочити на линију за додељивање вредности низа.

Корак 8: Од сада име низа „МиАрраи“ нема вредности, притисните Ф8 и све поменуте вредности биће додељене променљивој низа.

Корак 9: Сада ће петља почети да се покреће и притисните тастер Ф8 два пута и погледајте коју вредност добијамо у ћелији А1.

Упс !!! Сачекајте, наша прва вредност у променљивој низа је „Јан“, али резултат смо добили као другу вредност „Феб“ док још увек ради прва петља вредности.
Корак 10: То је зато што када ваше вредности вредности низа почињу од нуле, а не од 1, па морамо почетну петљу укључити као нулу.

Корак 11: Једном када се почетни положај петље смањи за један сличан завршетак, требало би да се смањи и за 1, зато завршите као 6 уместо 7.

Корак 12: Једном када је петља започела и завршила, потребно је још једно подешавање, тј. У својству ЦЕЛЛС користили смо променљиву „к“ као динамички бирач ћелија, али пошто наша петља започиње од нуле, нема ћелија која почиње са нулом , па додајте плус 1 променљивој „к“.

Шифра:

Суб Арраи_Сизе () Дим МиАрраи Ас Вариант МиАрраи = Арраи ("Јан", "Феб", "Мар", "Апр", "Маи", "Јун", "Јул") Дим к Ас Интегер Фор к = 0 То 6 Ћелије (к + 1, 1) .Вредност = МиАрраи (к) Следећи к Крај Суб

Корак 13: Дакле, након покретања петље, прва вредност „к“ је нула, а пошто смо додали плус 1, вредност „к“ ће бити 1, тако да се односи на ћелију А1.
Корак 14: Сада покрените код и све вредности низа биће ускладиштене у ћелијама.

Међутим, у овом случају смо ручно одредили величину почетка и завршетка петље, али величина низа се лако може одредити помоћу функција ЛБОУНД & УБОУНД.

Аутоматски пронађи величину низа

Корак 1: Када смо укључили почетну и завршну тачку петље у горе наведено, ручно смо пребројали број вредности које низ има, али за покретање низа користите функцију ЛБОУНД и за ову пропусницу име променљиве „МиАрраи“.

Корак 2: Да бисте одредили последњу величину низа, користите функцију УБОУНД и унесите име низа „МиАрраи“.

Шифра:

Суб Арраи_Сизе () Дим МиАрраи Као варијанта МиАрраи = Арраи ("Јан", "Феб", "Мар", "Апр", "Маи", "Јун", "Јул") Дим к Као целобројно за к = Лбоубд (МиАрраи ) У УБоунд (МиАрраи) ћелије (к + 1, 1) .Валуе = МиАрраи (к) Следећи к Крај Суб