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