Excel VBA е моќна и практична алатка за извршување на задачи прилично брзо во голема количина. Можете да примените неколку услови и да изведете различни резултати врз основа на поединечните услови преку VBA. Сега, понекогаш, можеби ќе сакате да проверите дали постои одреден лист во вашата работна книга. И, ако не, можеби ќе треба да го креирате тој лист. Во оваа статија, ќе ви ги покажам сите чекори за да додадете лист ако не постои, користејќи Excel VBA.

Excel VBA: Додадете лист ако не постои (Брз преглед)

8592

Вметнете во нов модул за да го примените кодот погоре.

Преземете ја работната книга за вежбање

Може да ја преземете нашата практична работна книга од овде бесплатно!

Чекори за примена на VBA код за додавање лист во Excel ако не постои

Да речеме, имате работна книга која содржи 4 работни листови со име јануари, февруари, март и април. Секој лист го содржи извештајот за продажба на следниот месец. Сега, треба да најдете неколку листови во работната книга и да го додадете листот ако не постои. Можете да ги следите упатствата чекор-по-чекор подолу за да го постигнете ова.

📌 Чекор 1: Вметнете нов модул

Прво, треба да вметнете модул за пишување VBA код.

• За да го направите ова, на самиот почеток, одете во алатката Developer tab >> Visual Basic .

• Како резултат на тоа, Microsoft VisualЌе се појави прозорецот Basic for Applications .
• Подоцна, одете во алатката Вметни таб >> Module .

Така, создаден е нов модул со име Module1 .

Прочитајте повеќе: Како да додадете лист со Име во Excel VBA (6 лесни начини)

Слични читања

• Креирајте нова работна книга и зачувајте користејќи VBA во Excel
• Excel VBA: Направете нова работна книга и именувајте ја (6 примери)
• Како да креирате нов лист од шаблон користејќи макро во Excel

📌 Чекор 2: Напишете и зачувајте го потребниот VBA код

Сега, треба да го напишете кодот внатре во модулот и да го зачувате.

• Во за да го направите ова, кликнете на опцијата Module1 и напишете го следниов код во прозорецот на кодот.

48622642

• Како како резултат, прозорецот за код ќе изгледа вака.

🔎 Објаснување на кодот:

♣ Сегмент 1:

1756

Во овој дел, ги деклариравме името на макрото и променливата име es.

♣ Сегмент 2:

1398

Во овој дел, создадовме поле за внесување. Преку ова поле за внесување, можеме да го земеме внесувањето на името на датотеката што треба да ја најдеме.

♣ Сегмент 3:

6575

Во овој дел проверуваме дали бараниот лист постои во работната книга. Ако не, ќе го создаде потребниот лист и ќе ни покаже порака за оваа промена.

♣ Сегмент 4:

9281

Во овој дел, работевме со резултатот доколку бараниот лист веќе постои во работната книга. Во ова сценарио, ќе се појави друго поле за пораки што ќе ве информира дека овој лист постои. Понатаму, во овој дел правилно го завршуваме кодот.

• Потоа притиснете Ctrl + S.

• Подоцна, ќе се појави прозорец Microsoft Excel . Кликнете на копчето Не .

• Како резултат на тоа, ќе се појави прозорецот Зачувај како .
• Следува, изберете ја опцијата Зачувај како тип: како формат .xlsm . Потоа, кликнете на копчето Зачувај .

Така, го напишавте и зачувавте потребниот код.

Забелешка:

Мора да ја зачувате работната книга на Excel во формат .xlsm . Во спротивно, макрото нема да биде овозможено и кодот нема да работи.

Прочитајте повеќе: Excel VBA за додавање лист со име на променлива (5 идеални примери)

📌 Чекор 3: Извршете го кодот

Сега, треба да го извршите кодот и да ги проверите резултатите.

• За да го направите ова, прво и основно, кликнете на иконата Стартувај во прозорецот Microsoft Visual Basic за апликации .

• Како резултат на тоа, ќе се појави прозорецот Макроа .
• Подоцна, изберете го макрото AddSheetIfNotExist и кликнете на копчето Изврши .

• Во овој момент, нашето креирано поле за поракиќе се појави со име Додај лист ако не постои . Овде, автоматската опција би била Лист 5 .

• Сега, за проверка, напишете „Април“ во полето за текст и кликнете на копчето Во ред .

• Подоцна, ќе видите дека друга порака ќе се појави поле кое ќе ви каже дека листот веќе постои.
• Кликнете на копчето Во ред .

• Потоа, извршете го кодот повторно и напишете „Мај“ во полето за текст на креираното поле за пораки. Последователно, кликнете на копчето OK .

• Како резултат на тоа, ќе видите друго поле за порака што ќе се појавува и ве информира дека листот „Мај“ не постоел и затоа го создал овој лист.
• Следува, кликнете на копчето OK .

Конечно, можете да видите дека сте додале лист што не постоел порано. И, работната книга сега би изгледала вака.

Прочитај повеќе: Excel VBA: Додај лист после последното (3 идеални примери)

Заклучок

Значи, во оваа статија ви ги покажав сите чекори за да додадете лист ако не постојат со Excel VBA. Поминете ја целата статија внимателно за да ја разберете подобро и да го постигнете посакуваниот резултат. Се надевам дека оваа статија ќе ви биде корисна и информативна. Ако имате дополнителни прашања или препораки, ве молиме слободно контактирајте ме.

И, посетете го ExcelWIKI за многу повеќенаписи како оваа. Ви благодариме!