ВБА Селецт Цасе Фунцтион - Како се користи Екцел ВБА Селецт Цасе?

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

Anonim

ВБА Селецт Цасе

ВБА Селецт Цасе један је од сличних услова који користимо за тестирање више услова уместо традиционалног ИФ стања у ВБА. Селецт Цасе делује потпуно на исти начин на који функционише услов ИФ.

Као што тестирамо више услова и цртамо резултате са ИФ условима слично користећи СЕЛЕЦТ ЦАСЕ тестирамо стање и извлачимо резултате. У овом чланку ћу вас водити кроз идеологију изјаве СЕЛЕЦТ ЦАСЕ.

Формула ВБА Селецт Цасе

Како се користи Екцел ВБА Селецт Цасе ?

Да разумемо како се користи ВБА Селецт Цасе Екцел функција са неколико примера.

Овде можете преузети овај ВБА шаблон за избор функције случаја овде - ВБА Шаблон за одабир функције случаја

ВБА функција функције случаја - пример бр. 1

Претпоставимо да имате вредност у ћелији А1 и желите да тестирате да ли је та вредност већа од 100 или не.

Ако је вредност већа од 100, резултат нам је потребан као "Више од 100" у ћелији Б1 или ће нам бити потребан као "Мање од 100". Испод кода ће урадити посао за нас.

 Под СелецтЦасе_Ек () Изаберите опсег случаја ("А1"). Вредност случаја је> 100 распона ("Б1"). Вредност = "Више од 100" Опсег случајева других предмета ("Б1") Вредност = "Мање од 100" Крај одабира Енд Суб

Покрените овај код помоћу тастера Ф5 или ручно како је приказано да бисте добили резултате у ћелији Б1.

Функција одабира случаја ВБА - пример бр. 2

Сада ћемо погледати угнијежђене изјаве случаја Селецт. Претпоставимо да имате табелу за поврат кредита од јануара до децембра.

У одељку о статусу података морамо добити следећи резултат.

  • Ако је вредност опоравка већа од 45000, резултат би требао бити „одличан“
  • Ако је вредност опоравка већа од 40000, резултат би требао бити „врло добар“
  • Ако је вредност опоравка већа од 30000, резултат би требао бити „добар“
  • Ако је вредност опоравка већа од 20000, резултат би требао бити „није лоше“
  • Ако су сви резултати ФАЛСЕ, онда би резултат требао бити "Бад"

Будући да требамо тестирати више случајева, морамо користити угнијежђене изјаве Селецт Цасе слично као угнијежђене ИФ изјаве.

 Под ИФ_Ресултс () Дим и као цели број и = 2 За и = 2 до 13 Изаберите ћелије случаја (и, 2). Случај величине је> 45000 ћелија (и, 3) .Валуе = "Одличан" случај је> 40000 ћелија, 3) .Валуе = "Веома добар" случај је> 30000 ћелија (и, 3) .Валуе = "Добар" случај је> 20000 ћелија (и, 3) .Валуе = "Није лоше", остале ћелије (и, 3 ) .Валуе = "Бад" Енд Изаберите Нект и Енд Суб

Копирајте овај код и залепите у свој модул.

Сада покрените овај код помоћу Ф5 тастера или ручно да бисте добили жељене резултате у колони Статус.

ВБА Селецт Цасе Фунцтион - Пример бр. 3

Сада ћемо видети Селецт Цасе са сопственом улазном вредношћу. Видећемо како да унесемо вредност у поље за унос и на основу унесене унесене вредности утврдићемо резултат.

 Под СелецтЦасе_ИнпутБок () Дим МиВалуе као цео број МиВалуе = Апплицатион.ИнпутБок ("Унесите само бројчану вредност", "Ентер нумбер") Изаберите случај МиВалуе Цасе је> 1000 МсгБок "Унесена вредност је већа од 1000" Случај је> 500 МсгБок "Унесена вредност је више од 500 „Унесена вредност„ Цасе Елсе МсгБок “је мања од 500„ Енд Селецт Енд Суб

Копирајте и залепите овај код у модул.

Корак 1: Након копирања кода у ваш модул, покрените код који ћете видети у овом пољу за унос.

Корак 2: Овде морамо унети само нумеричке вредности.

Корак 3: Сада кликните на ОК, видећемо оквир са порукама који приказује резултат резултата изјаве Селецт Цасе.

ВБА Селецт Цасе Фунцтион - Пример бр. 4

У овом примеру ћемо видети како да прођемо низ бројева као тест за одабир случаја и на основу тога ћемо извући резултате.

Копирајте и залепите доњи код у модул да бисте га покренули и покренули.

 Под СелецтЦасе () Дим Минумбер Ас Интегер Минумбер = Апплицатион.ИнпутБок ("Унесите број", "Молимо унесите бројеве од 100 до 200") Одаберите Цасе Минумбер Цасе 100 до 140 МсгБок "Број који сте унели је мањи од 140" Случај 141 На 180 МсгБок "Број који сте унели је мањи од 180" Цасе Елсе МсгБок "Број који сте унели је> 180 & <200" Енд Селецт Енд Суб

Корак 1: Покрените овај код, видећете оквир за унос .

Корак 2: Као што упит каже да морамо да унесемо бројеве од 100 до 200. Дакле, унесите бројеве између 100 и 200.

Корак 3: Кликните на ОК. Резултат ћемо видети на основу резултата испитивања случаја.

Ствари које треба запамтити

  • За разлику од ИФ стања, тест тест неће проћи све услове у Селецт Цасе. Чим је услов испуњен, он ће напустити остале услове.
  • Као и сви други услови овде и све вредности текста требају бити у двоструким наводницима.
  • Ово функционише потпуно слично ИФ изјави у ВБА. Ово је врста алтернативе ИФ изјави.

Препоручени чланци

Ово је водич за функцију ВБА Селецт Цасе. Овде смо расправљали о ВБА Селецт Цасе и како се користи Екцел ВБА Селецт Цасе Фунцтион заједно са неколико практичних примера и преузети Екцел предложак. Можете и да прођете кроз друге наше предложене чланке -

  1. Водич за Екцел ВБА петље
  2. Како се користи ВБА функција у Екцелу?
  3. Како се користи ВБА ВЛООКУП функција?
  4. Како креирати оквир Екцел листе?