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