Једна од досаднијих ствари у Екцел-у је затварање више радних свеска одједном. За сваку радну свеску коју сте отворили, потребно је да активирате радњу, затворите је и потврдите чување промена. Екцел нема лак начин да их све затвори одједном. Овај мали макро се брине за ту сметњу.
Како функционише макро
У овом макроу, колекција Радне свеске пролази кроз све отворене радне свеске. Док макро пролази кроз сваку радну свеску, он их чува и затвара:
Подмакро1()
'Корак 1: Декларисајте своје променљиве
Дим вб Ас Воркбоок
„Корак 2: Прођите кроз радне свеске, сачувајте и затворите
За сваки вб у радним свескама
вб.Цлосе СавеЦхангес:=Тачно
Нект вб
Енд Суб
Корак 1 декларише променљиву Објецт која представља објекат Воркбоок. Ово вам омогућава да набрајате све отворене радне свеске, бележећи њихова имена док идете.
Корак 2 једноставно петља кроз отворене радне свеске, чува их и затвара. Ако не желите да их сачувате, промените аргумент СавеЦхангес из Тачно у Нетачно.
Како користити макро
Најбоље место за чување овог макроа је у вашој личној радној свесци макроа. На овај начин, макро вам је увек доступан. Лична радна свеска макроа се учитава кад год покренете Екцел. У прозору ВБЕ пројекта носи назив персонал.клсб.
Активирајте Висуал Басиц Едитор притиском на Алт+Ф11.
Кликните десним тастером миша на персонал.клб у прозору пројекта.
Изаберите Инсерт→Модуле.
Откуцајте или налепите код у новокреирани модул.
Ако не видите персонал.клб у прозору вашег пројекта, он још увек не постоји. Мораћете да снимите макро користећи личну радну свеску за макрое као одредиште.
Да бисте снимили макро у своју личну радну свеску макроа, отворите дијалог Снимање макроа. На падајућој листи Сторе Мацро Ин изаберите Персонал Мацро Воркбоок. Затим једноставно снимите неколико кликова на ћелију и зауставите снимање. Можете одбацити снимљени макро и заменити га овим.