Екцел ВБА Енвиронмент функција

ВБА Енвиронмент у којем окружење означава Енвиронмент користи се за добијање било каквих информација које се налазе у оперативном систему. Функција Екцел ВБА Енвиронмент враћа вредност као што су путања, локација, име, проширење доступне у систему. Поред овог окружења (оперативни систем) се налазе и информације о корисничком имену, ауторизацији, имену директорија и сл.

ВБА Енвиронмент само израз сматра уносом. Где тај израз може бити било шта. Испод је синтакса окружења.

Како се користи функција окружења у Екцелу ВБА?

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

Можете преузети овај ВБА Енвиронмент Екцел образац овде - ВБА Енвиронмент Екцел предложак

ВБА окружење - пример бр. 1

Постоје различити начини за добијање информација о оперативном систему путем ВБА окружења. Један од њих ћемо видети у овом примеру. Испод је листа могућих овлашћених корисника мог система који могу бити ТРУЕ или ФАЛСЕ. Поменули смо та имена у Схеет2.

Следите доле наведене кораке за коришћење функције Енвиронмент у ВБА:

Корак 1: Сада ћемо уз помоћ ВБА Енвиронмент пронаћи шта је то исправно овлашћено корисничко име тренутног оперативног система. Схеет1 је место у коме ћемо пронаћи тачно корисничко име система у ћелији Ц3.

Корак 2: Под заглављем " Одобрено? ”Видећемо да ли је корисничко име овлашћено или не са функцијом Иф и ЦоунтИф као што је приказано у наставку. Ако је корисничко име валидно и овлаштено, добит ћемо ДА, ако је валидно али није овлашћено, добит ћемо Не. И за неовлаштено и неваљано корисничко име и даље ћемо добити бр.

Корак 3: Сада, у радном листу Екцела, направите командно дугме које је доступно на картици Девелопер под активном Кс контролом у менију као што је приказано у наставку.

Корак 4: Сада направите командно дугме било где у листу. Такође можемо одабрати било који облик преко командног дугмета.

Корак 5: Кликните десним тастером миша на створено дугме и идите на опцију Својства .

Корак 6: Под тим, подразумевано име можемо променити у било шта. Овде смо изабрали Рун Енвиронмент као што је приказано у наставку.

Корак 7: Сада кликните десним тастером миша на исти тастер и изаберите Виев Цоде да бисте отворили ВБА прозор.

Корак 7: У том случају, добит ћемо унапред уграђену пот-процедуру командног дугмета.

Шифра:

 Привате Суб ЦоммандБуттон2_Цлицк () Енд Суб

Корак 8: Изаберите лист на који желимо да применимо околину функције.

Шифра:

 Приватни Суб ЦоммандБуттон2_Цлицк () листови ("Схеет1") Крај Суб

Корак 9: Затим одаберите ћелије опсега у којима желимо да видимо излаз.

Шифра:

 Приватни Суб ЦоммандБуттон2_Цлицк () листови ("Схеет1"). Распон ("Ц3") = Крај суб

Корак 10: Сада користите околину функцију са пољем које желимо да добијемо. Овде желимо да видимо УСЕРНАМЕ.

Шифра:

 Приватни Суб ЦоммандБуттон2_Цлицк () листови ("Схеет1"). Распон ("Ц3") = окружење ("УСЕРНАМЕ") Крај Пот

Корак 11: Сада отворите ИФ-ЕЛСЕ петљу у којој напишите стање ако је ћелија Е3 да, тада ми дате поруку као овлашћеног корисника.

Шифра:

 Приватни Суб ЦоммандБуттон2_Цлицк () листови ("Схеет1"). Распон ("Ц3") = окружје ("УСЕРНАМЕ") Ако листови ("Схеет1"). Распон ("Е3") = "Да", затим МсгБок "овлашћени корисник!" Енд Суб

Корак 12: У Елсе-у ми пошаљите поруку као Неовлаштени корисник као што је приказано у наставку.

Шифра:

 Приватни Суб ЦоммандБуттон2_Цлицк () листови ("Схеет1"). Распон ("Ц3") = окружје ("УСЕРНАМЕ") Ако листови ("Схеет1"). Распон ("Е3") = "Да", затим МсгБок "овлашћени корисник!" Остало МсгБок „Ненамењени корисник“ крај ако крај Суб

Корак 13: Сада ћемо саставити наш код, корак по корак, притиском на функцијску типку Ф8 да видимо да ли постоји грешка или не. Ако је све добро, изађите из прозора ВБА и поништите избор Дизајн режима са картице Девелопер као што је приказано у наставку.

Корак 14: Сада ћемо покренути свој макро кликом на командно дугме под називом „Покрени окружење“. Видећемо на Ц3, ауторизовано корисничко име се штампа као Гаме2, а затим се двапут потврђује. Једном поред оквира за поруке и остало у ћелији Е3.

То значи да је корисничко име које се на Схеет2 спомиње као Гаме2 ваљано и овлашћено и једно и друго.

ВБА окружење - пример бр. 2

Постоји још један начин на који можемо добити комплетне информације о оперативном систему који имамо. Ово функционише на исти начин као што смо видели у примеру-1. За то следите следеће кораке:

Корак 1: Отворите модул на картици менија Уметање.

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

Шифра:

 Опција Експлицитна функција ЦомпНаме () Крајња функција

Корак 3: Претпоставимо да ако желите да видите Име рачунара, користите било коју реч која дефинише Рачунар. Овде смо изабрали ЦомпНаме и користили околину функцију са „ Име рачунара “.

Шифра:

 Опција Експлицитна функција ЦомпНаме () ЦомпНаме = Енвиронмент („ЦомпутерНаме“) Крајња функција

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

Шифра:

 Опција Експлицитна функција ЦомпНаме () ЦомпНаме = Енвиронмент ("ЦомпутерНаме") Енд Фунцтион Темп () Енд Фунцтион

Корак 5: Сада поново употријебите било коју ријеч која дефинира путању датотеке Темп, попут ТемпДир-а и уметните Енвиронмент функцију с ТЕМП-ом .

Шифра:

 Опција Експлицитна функција ЦомпНаме () ЦомпНаме = Енвиронмент ("ЦомпутерНаме") Крајња функција Функција Темп () ТемпДир = Енвиронмент ("Темп") Енд Фунцтион

Корак 6: Након тога отворите потпроцеру у којој ћемо користити обе функције које смо горе дефинисали да бисмо видели њихове детаље.

Шифра:

 Опција Експлицитна функција ЦомпНаме () ЦомпНаме = Енвиронмент ("ЦомпутерНаме") Крајња функција Функција Темп () ТемпДир = Енвиронмент ("Темп") Енд Фунцтион Суб Енвиро () Енд Суб

Корак 7: Дефинишите променљиву као Лонг у којој ћемо видети детаље.

Шифра:

 Опција Експлицитна функција ЦомпНаме () ЦомпНаме = Енвиронмент ("ЦомпутерНаме") Крајња функција Функција Темп () ТемпДир = Енвиронмент ("Темп") Енд Фунцтион Суб Енвиро () Дим А Ас Лонг Енд Суб

Корак 8: Отворите петљу Фор-Нект и додајте дужину променљивој А колико ће дуго бити ограничење броја знакова. Овде смо то поставили као 50.

Шифра:

 Опција Експлицитна функција ЦомпНаме () ЦомпНаме = Енвиронмент ("ЦомпутерНаме") Крајња функција Функција Темп () ТемпДир = Енвиронмент ("Темп") Енд Фунцтион Суб Енвиро () Дим А Ас Лонг фор А = 1 до 50 Енд Суб

Корак 9: Сада користите Дебуг Принт за променљиву А и са функцијом Енвиронмент као што је приказано у наставку.

Шифра:

 Опција Експлицитна функција ЦомпНаме () ЦомпНаме = Енвиронмент ("ЦомпутерНаме") Крајња функција Функција Темп () ТемпДир = Енвиронмент ("Темп") Енд Фунцтион Суб Енвиро () Дим А Ас Лонг фор А = 1 до 50 Дебуг.Принт Енвиронмент (А ) Следећи крај Суб

Корак 10: Саставите сваки корак кода и отворите тренутни прозор на картици менија Прикажи.

Корак 11: Сада покрените код кликом на дугме Плаи који се налази испод траке са менијима.

Корак 12: У непосредном прозору ћемо видети комплетне детаље оперативног система који се односе на функције које смо прогласили.

Предности Екцел ВБА функције окружења

  • Чини се сложеним, али је лако имплементирати.
  • Даје комплетне детаље о рачунару и оперативном систему.
  • Можемо навести било који одређени детаљ, као и према нашим захтевима.
  • Такође можемо видети ко је ауторизовани корисник који користи и уређује систем.

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

  • ВБА окружење није ограничено на поступак приказан у горњим примерима. Можемо добити много више детаља о оперативном систему као што су било која путања, локација, фасцикла или датотека, чак и било које величине датотеке, уз помоћ ВБА окружења.
  • Ако било која вредност коју уносимо није табела стрингова окружења, онда ћемо на крају добити низ нулте дужине.
  • Једном када завршимо са кодирањем, сачувајте датотеку у макро омогућавању екцел формата да не бисте изгубили код.

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

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

  1. ВБА ИФ Изјаве | Обрасци Екцел
  2. Како се користи функција Екцел ВБА за сортирање?
  3. ВБА Док је петља (примери са Екцеловим предлошком)
  4. ВБА бројач (примери)

Категорија:

ВБА