Екцел ВБА ЦомбоБок
ЦомбоБок је функција корисничког обрасца у ВБА , они се разликују од текстуалних оквира јер се текстуални оквири користе да садрже само текст и дозвољавамо кориснику да унесе било коју врсту података, али помоћу комбинираних оквира ограничавамо корисника за врсту одговора коју желимо стога су подаци уредни, слично је провери података на листи у екцелу.
ЦомбоБок се може упоредити са падајућом листом у Екцелу, на радним листовима. Користили смо проверу података да бисмо обезбедили падајући мени, али у ВБА постоји функција корисничког обрасца где се користи за пружање падајућег менија у било ком корисничком облику, али ако желимо да користимо комбинирани оквир у Екцелу, можемо такође му приступите из одељка за програмере, одакле можемо створити комбиниране оквире за појединачне или више ћелија.
Цомбо Бок је врло сличан падајућем списку који имамо у екцел радном листу; помоћу комбинованог оквира можемо да складиштимо унапред одређене вредности како би корисници учинили избор са листе доступним из комбинираног оквира. Цомбо Бок се обично користи заједно са корисничким обрасцима као део добијања података од корисника.
Кориснички обрасци су корисни, али постојање других алата на корисничком обрасцу је оно што чини кориснички образац тако посебним. Један од алата који често користимо као алатку за образац корисника је „ЦомбоБок“.
Топ 2 начина за стварање ВБА ЦомбоБок-а
# 1 - Коришћење директног кодирања
Прво ћемо видети како да користимо Цомбо Бок са радним листом. Отворите било који радни лист у Екцеловој радној свесци, идите на картицу Девелопер и испод ове картице имамо алат под називом „Инсерт“. Кликните на ово, а испод тога имамо две опције Ацтиве Кс Цонтролс и Форм Цонтролс у екцелу.
Из „Ацтиве Кс Цонтролс“ одаберите „Цомбо Бок“.
Сада можете нацртати овај објекат на било ком радном листу.
Кликните десним тастером миша на комбинирани оквир и одаберите опцију “Пропертиес”.
Када одаберете својства, отвориће се огромна листа својстава комбинираног оквира.
За овај комбинирани оквир даћемо листу имена одјељења, па промијените својство имена комбинираног оквира у „ДептЦомбоБок“.
Сада ће се ово комбинирано поље називати именом „ДептЦомбоБок“. Морамо да дамо унапред одређена имена одељења, тако да овде имам списак назива одељења.
Сада ове вредности морамо додати на листу комбинираних оквира. То можемо учинити на два начина, путем кодирања или помоћу менаџера имена.
Двапут кликните на Цомбобок и водиће вас до поступка ВБА макронаредби.
Али имена ових одељења морамо видети када се отвори радна свеска, па двапут кликните на „ТхисВоркбоок“.
На падајућем списку одаберите „Радна свеска“.
Изаберите једну од опција „Отвори“.
Сада ће створити празно место попут доњег.
Унутар овог макронаредба унесите доњи код.
Шифра:
Привате Суб Воркбоок_Опен () Витх Ворксхеетс ("Схеет1"). ДептЦомбоБок .АддИтем "Финанце" .АддИтем "Маркетинг" .АддИтем "Мерцхандисинг" .АддИтем "Оператионс" .АддИтем "Аудит" .АддИтем "Цлиент Сервицинг" Енд витх Енд Суб
Ок, сада сачувајте и затворите радну свеску. Када поново отворите радну свеску, могли смо да видимо имена одељења у њој.
# 2 - Коришћење УсерФорм-а
Други начин додавања вредности у ЦомбоБок је коришћењем корисничког обрасца. Прво дајте ћелијама назив „Одељење“.
Идите на Висуал Басиц Едитор и убаците кориснички образац из опције ИНСЕРТ.
Сада је креиран нови кориснички образац.
Поред корисничког обрасца, из овог оквира са алаткама можемо видети „Тоолбок“, можемо уметнути „Цомбо Бок“.
Now the combo box is embedded in the user form. In this method, to open the properties option, select the combo box and press the F4 key to open the properties window.
Scroll down the properties tab and choose “Row Source.”
For this “Row Source,” enter the name that we had given to department name cells.
Now this combo box holds the reference of the name “Department.”
Now run the user form by using the run button.
Now we can see a list of department names in the combo box on the user form.
Practically user form is associated with a combo box, text box, and many other tools. We will create a simple data entry user form with a text box & combo box.
Create a user form like the below.
Create two Command Buttons.
Double click on the “SUBMIT” button it will open up below macro.
Inside this macro, add the below code.
Code:
Привате Суб ЦоммандБуттон1_Цлицк () Дим ЛР Лонг ЛР = Целлс (Ровс.Цоунт, 1) .Енд (клУп) .Ров + 1 Целлс (ЛР, 1) .Валуе = ТектБок1.Валуе Целлс (ЛР, 2) .Валуе = ЦомбоБок1 .Вредност Крај Суб
Сада двапут кликните на дугме „ОТКАЖИ“ и додајте доњи код.
Сада на радном листу створите шаблон као у наставку.
Сада покрените кориснички образац и он ће се отворити овако.
Унесите име запосленог и изаберите име одељења са комбиноване листе.
Кликните на дугме ПОШАЉИ и погледајте чаролију.
Добили смо вредности унете у формат табеле који смо креирали.
Ствари које треба запамтити
- ЦОМБО БОКС такође има своја својства.
- Додавање вредности на листу долази на два начина. Један је начин кодирања, а други референца имена домета.
- ЦОМБО БОКС је обично део корисничког обрасца.
