ВБА именовани опсег | Како створити и користити именоване домете?

Екцел ВБА именовани опсег

Када радимо са великом количином података како бисмо избегли упућивање на одређену ћелију или опсеге ћелија, обично креирамо именоване опсеге и омогућава нам да се кроз именовани опсег упутимо на тражени опсег ћелија. У ВБА за креирање опсега имена имамо функцију Додај име.

Можемо одабрати ћелију или опсег ћелија и дати јој име. Након именовања ћелија, можемо се позивати на те ћелије уносом тих дефинисаних имена уместо уобичајених референци реда или колоне.

Овде можете преузети овај ВБА Намед Ранге Екцел предложак - ВБА Намед Ранге Екцел Предложак

Како створити именоване домете?

Стварање именованих домета је посао у парку. Прво што треба да урадимо је да у Екцелу идентификујемо ћелије којима желимо да креирамо опсег имена.

За пример погледајте доњу слику.

Да бих стигао до добити у ћелији Б4, применио сам формулу Б2 - Б3.

То је уобичајена ствар коју сви раде. Али како би било да направите Имена и примените формулу попут "Продаја" - "Цена".

Поставите курсор на ћелију Б2> Иди на поље Име и назовите га Продаја.

Поставите курсор на ћелију Б3 и назовите је Цост.

Сада у колони профита можемо упутити ова имена уместо референци на ћелије.

Ово је основна ствар у вези са именованим ланцима.

Како створити именоване домете помоћу ВБА кода?

Пример # 1

Да ли сте икада помислили да креирате именовани опсег помоћу ВБА кода?

Следите кораке у наставку да бисте креирали именовани опсег.

Корак 1: Дефинишите променљиву као „опсег“.

Шифра:

 Суб НамедРангес_Екампле () Дим Рнг Ас Ранге Енд Суб 

Корак 2: Сада подесите променљиву „Рнг“ на одређене ћелије којима желите да дате назив.

Шифра:

 Суб НамедРангес_Екампле () Дим Рнг Ас Ранге Сет Рнг = Ранге ("А2: А7") Енд Суб 

Корак 3: Коришћење објекта „ТхисВоркбоок“ приступа својству Имена.

Имамо толико параметара са Имена.Додај метода. Испод су објашњења.

[Име]: Име није ништа друго већ оно које бисмо име желели дати опсегу који смо навели.

Именовање ћелије не би требало да садржи посебне знакове, осим знака за подвлачење (_), а не би требало да садржи и размаке, не би требало да започиње нумеричким вредностима.

[Се односи на]: Ово није ништа друго доли колики је распон ћелија на које се позивамо.

Мислим да су ова два параметра довољно добра да започну поступак.

Корак 4: У име аргумент уноси име које желите да дате. Назвао сам „Продајни бројеви“.

Шифра:

 Суб НамедРангес_Екампле () Дим Рнг Ас Ранге Сет Рнг = Ранге ("А2: А7") ТхисВоркбоок.Намес.Адд Наме: = "СалесНумберс" Енд Суб 

Корак 5: У аргументу упућује на унесите опсег ћелија које желимо да створимо. У име променљиве „Рнг“ већ смо доделили опсег ћелија од А2 до А7, па наведите аргумент као „Рнг“.

Шифра:

 Суб НамедРангес_Екампле () Дим Рнг Ас Ранге Сет Рнг = Ранге ("А2: А7") ТхисВоркбоок.Намес.Адд Наме: = "СалесНумберс", РеферсТо: = Рнг Енд Суб 

Ок, овај код ће створити именовани опсег за ћелије од А2 до А7.

Сада сам на радном листу створио неке бројеве од А2 до А7.

У ћелији А8 желим да имам укупан број горе наведених бројева ћелија. Користећи именовани опсег, креираћемо ЗБОР ових бројева.

Шифра:

 Суб НамедРангес_Екампле () Дим Рнг Ас Ранге Сет Рнг = Ранге ("А2: А7") ТхисВоркбоок.Намес.Адд Наме: = "СалесНумберс", РеферсТо: = Рнг Ранге ("А8"). Валуе = ВорксхеетФунцтион.Сум (Ранге ( „Продајни бројеви“)) Крај под 

Ако овај код покренете ручно или притиском на тастер ф5, добићемо збир именованог опсега у ћелији А8.

Ово су основне чињенице које треба знати о „именованим ланцима“.

Пример # 2

У ВБА помоћу објекта РАНГЕ можемо се позвати на ћелије. Слично томе, на те ћелије се такође можемо позивати и коришћењем именованих опсега.

На пример, у горњем примеру смо ћелију Б2 назвали као „Продаја“ а Б3 као „Трошак“.

Коришћењем стварне референце на ћелије позивамо се на ове ћелије попут ове.

Шифра:

 Суб НамедРангес () опсег („Б2“). Изаберите „Ово ће одабрати опсег Б2 ћелије („ Б3 “). Изаберите„ Овим ћете изабрати крај БД ћелије Б3 

Пошто смо већ креирали ове ћелије, можемо се позивати на та имена као што је доле.

Шифра:

 Суб НамедРангес () опсег („продаја“). Изаберите „Ово ће одабрати ћелију названу„ продаја “, тј. Опсег Б2 ћелије („ цена “). Изаберите„ Ово ће одабрати ћелију названу „трошак“, тј. 

Овако користећи Намед Рангес, ми можемо искористити те ћелије. Користећи ове именоване можемо израчунати износ добити у ћелији Б4. За ово прво име ћелију Б4 зовите Профит.

Сада у ВБА едитору примените овај код.

Шифра:

 Суб НамедРангес_Екампле1 () опсег („добит“). Вредност = опсег („продаја“) - опсег („цена“) крај под 

Ово ће израчунати износ добити у ћелији под називом „Профит“.