Како користити структуру за одабир предмета у програму Екцел 2016 ВБА

Структура Селецт Цасе је корисна ВБА структура за одлуке које укључују три или више опција у програму Екцел 2016 (иако ради и са две опције, пружајући алтернативу структури Иф-Онда-Елсе).

Пример за избор случаја

Следећи пример показује како се користи структура Селецт Цасе:

Суб СховДисцоунт3()
  Дим Куантити Ас Лонг
  Дим Дисцоунт Ас Доубле
  Количина = ИнпутБок(“Унесите количину: “)
  Изаберите Количина случаја
    Случај 0 до 24
      Попуст = 0,1
    Случај 25 до 49
      Попуст = 0,15
    Случај 50 до 74
      Попуст = 0,2
    Случај је >= 75
      Попуст = 0,25
  Крај Изаберите
  МсгБок „Попуст:“ & Попуст
Енд Суб

У овом примеру се процењује променљива Количина. Рутинска провера за четири различита случаја (0–24, 25–49, 50–74 и 75 или више).

Било који број исказа може да прати сваку наредбу Цасе, и сви се извршавају ако је случај истинит. Ако користите само једну наредбу, као у овом примеру, можете ставити наредбу у исти ред са кључном речи Цасе, којој претходи двотачка — знак за раздвајање ВБА исказа. Ово чини код компактнијим и мало јаснијим. Ево како рутина изгледа у овом формату:

Суб СховДисцоунт4 ()
  Дим Куантити Ас Лонг
  Дим Дисцоунт Ас Доубле
  Количина = ИнпутБок(“Унесите количину: “)
  Изаберите Количина случаја
    Случај 0 до 24: Попуст = 0,1
    Случај 25 до 49: Попуст = 0,15
    Случај 50 до 74: Попуст = 0,2
    Случај је >= 75: Попуст = 0,25
  Крај Изаберите
  МсгБок „Попуст:“ & Попуст
Енд Суб

Када ВБА изврши структуру Селецт Цасе, структура се напушта чим ВБА пронађе прави случај и изврши наредбе за тај случај.

Пример угнежђеног Селецт Цасе

Као што је показано у следећем примеру, можете угнездити Селецт Цасе структуре. Ова рутина испитује активну ћелију и приказује поруку која описује садржај ћелије. Приметите да процедура има три структуре Селецт Цасе, и свака има свој Енд Селецт наредбу:

Суб ЦхецкЦелл()
  Пригуши поруку као стринг
  Изаберите Цасе Ис Емпти (АцтивеЦелл)
    Цасе Труе
     Порука = „је празно.“
    Цасе Елсе
     Изаберите Цасе АцтивеЦелл.ХасФормула
       Цасе Труе
        Порука = „има формулу“
       Цасе Елсе
        Изаберите број великих и малих слова (АцтивеЦелл)
          Цасе Труе
           Порука = „има број“
          Цасе Елсе
           Порука = „има текст“
        Крај Изаберите
    Крај Изаберите
  Крај Изаберите
  МсгБок “Ћелија” & АцтивеЦелл.Адреса & “ “ & Мсг
Енд Суб

Логика иде отприлике овако:

Сазнајте да ли је ћелија празна.

Ако није празан, погледајте да ли садржи формулу.

Ако нема формуле, сазнајте да ли садржи нумеричку вредност или текст.

Када се рутина заврши, променљива Мсг садржи стринг који описује садржај ћелије. Функција МсгБок приказује ту поруку.

Како користити структуру за одабир предмета у програму Екцел 2016 ВБА

Порука коју приказује процедура ЦхецкЦелл.

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

Ако још увек нисте уверени да је увлачење кода вредно труда, претходни списак служи као добар пример. Удубљења заиста да би нивои гнежђења били јасни. Погледајте исти поступак без икаквог увлачења:

Суб ЦхецкЦелл()
Затамњење поруке као стринг
Изаберите Цасе Ис Емпти (АцтивеЦелл)
Цасе Труе
Порука = „је празно.“
Цасе Елсе
Изаберите Цасе АцтивеЦелл.ХасФормула
Цасе Труе
Порука = „има формулу“
Цасе Елсе
Изаберите број великих и малих слова (АцтивеЦелл)
Цасе Труе
Порука = „има број“
Цасе Елсе
Порука = „има текст“
Крај Изаберите
Крај Изаберите
Крај Изаберите
МсгБок “Ћелија” & АцтивеЦелл.Адреса & “ “ & Мсг
Енд Суб

Прилично несхватљиво, а?


Обришите цртеже оловком и маркером на својим ПоверПоинт слајдовима

Обришите цртеже оловком и маркером на својим ПоверПоинт слајдовима

Ако сте користили оловку или маркер за цртање на ПоверПоинт слајдовима током презентације, можете да сачувате цртеже за следећу презентацију или да их избришете тако да ћете следећи пут када их покажете почети са чистим ПоверПоинт слајдовима. Пратите ова упутства да бисте избрисали цртеже оловком и маркером: Брисање линија један на […]

Садржај библиотеке стилова у СхареПоинт 2010

Садржај библиотеке стилова у СхареПоинт 2010

Библиотека стилова садржи ЦСС датотеке, датотеке Ектенсибле Стилесхеет Лангуаге (КССЛ) и слике које користе унапред дефинисане главне странице, изгледе страница и контроле у ​​СхареПоинт 2010. Да бисте лоцирали ЦСС датотеке у библиотеци стилова на локацији за објављивање: Изаберите Радње сајта→Прикажи Сав садржај сајта. Појављује се садржај сајта. Библиотека Стил налази се у […]

Форматирајте бројеве у хиљадама и милионима у Екцел извештајима

Форматирајте бројеве у хиљадама и милионима у Екцел извештајима

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

Како делити и пратити СхареПоинт локације

Како делити и пратити СхареПоинт локације

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

Како претворити датуме у јулијанске формате у Екцелу

Како претворити датуме у јулијанске формате у Екцелу

Јулијански датуми се често користе у производним окружењима као временска ознака и брза референца за број серије. Ова врста кодирања датума омогућава продавцима, потрошачима и услужним агентима да идентификују када је производ направљен, а тиме и старост производа. Јулијански датуми се такође користе у програмирању, војсци и астрономији. Различит […]

Како да направите приступну веб апликацију

Како да направите приступну веб апликацију

Можете да креирате веб апликацију у програму Аццесс 2016. Дакле, шта је уопште веб апликација? Па, веб значи да је онлајн, а апликација је само скраћеница за „апликацију“. Прилагођена веб апликација је апликација базе података на мрежи којој се приступа из облака помоћу претраживача. Ви правите и одржавате веб апликацију у верзији за десктоп […]

Трака за брзо покретање у СхареПоинт 2010

Трака за брзо покретање у СхареПоинт 2010

Већина страница у систему СхареПоинт 2010 приказује листу веза за навигацију на траци за брзо покретање дуж леве стране странице. Трака за брзо покретање приказује везе ка садржају истакнутог сајта као што су листе, библиотеке, сајтови и странице за објављивање. Трака за брзо покретање укључује две веома важне везе: Линк за сав садржај сајта: […]

Шта значе поруке о грешци решавача у Екцел-у?

Шта значе поруке о грешци решавача у Екцел-у?

За једноставне проблеме, Солвер у Екцел-у обично брзо проналази оптималне вредности променљиве Решавача за функцију циља. Али, у неким случајевима, Солвер има проблема да пронађе вредности променљиве Солвера које оптимизују функцију циља. У овим случајевима, Солвер обично приказује поруку или поруку о грешци која описује или расправља о проблему који […]

Како уклонити израчуната поља и ставке из Екцел заокретне табеле

Како уклонити израчуната поља и ставке из Екцел заокретне табеле

Можете лако да уклоните израчуната поља и ставке из Екцел заокретне табеле. Да бисте уклонили израчунато поље, кликните на ћелију у изведеној табели. Затим кликните на команду Поља, ставке и скупови на картици Анализа и изаберите Израчунато поље из подменија који се појави. Када Екцел прикаже дијалог Уметање израчунатог поља, изаберите […]

Како означити у СхареПоинт-у

Како означити у СхареПоинт-у

Ознаке су кључне речи које додељујете садржају. Означавање страница за дељење са другима је обележавање на друштвеним мрежама, веома је популарно на вебу и лако је у СхареПоинт-у. Ако сте икада користили сајт као што је Делициоус, већ знате како функционише обележавање на друштвеним мрежама. Како све више људи додељује исте ознаке, ознаке постају начин на који […]