Excel VBA з'яўляецца магутным і зручным інструментам для даволі хуткага выканання задач у вялікай колькасці. Вы можаце прымяніць некалькі ўмоў і атрымаць розныя вынікі на аснове індывідуальных умоў праз VBA. Цяпер, часам, вы можаце праверыць, ці існуе пэўны аркуш у вашай працоўнай кніжцы. І, калі не, вам можа спатрэбіцца стварыць гэты ліст. У гэтым артыкуле я пакажу вам усе крокі, як дадаць аркуш , калі ён не існуе, з дапамогай Excel VBA.

Excel VBA: дадаць аркуш, калі ён не існуе (Хуткі прагляд)

7321

Устаўце ў новы модуль, каб прымяніць прыведзены вышэй код.

Спампаваць Практычны сшытак

Вы можаце спампаваць наш практычны сшытак адсюль бясплатна!

Крокі для прымянення кода VBA для дадання аркуша Excel, калі ён не існуе

Скажам, у вас ёсць працоўная кніга, якая змяшчае 4 аркушы з назвамі студзень, люты, сакавік і красавік. Кожны аркуш змяшчае справаздачу аб продажах за наступны месяц. Цяпер вам трэба знайсці некаторыя аркушы ў кнізе і дадаць аркуш, калі ён не існуе. Вы можаце прытрымлівацца прыведзеных ніжэй пакрокавых інструкцый, каб дасягнуць гэтага.

📌 Крок 1: Устаўце новы модуль

Спачатку вам трэба ўставіць модуль для напісання кода VBA.

• Каб зрабіць гэта, у самым пачатку перайдзіце на ўкладку Распрацоўшчык >> інструмент Visual Basic .

• У выніку Microsoft VisualЗ'явіцца акно Basic for Applications .
• Пасля гэтага перайдзіце на ўкладку Insert >> Module instrument.

Такім чынам, новы модуль пад назвай Module1 быў створаны.

Дадатковая інфармацыя: Як дадаць ліст з Імя ў Excel VBA (6 простых спосабаў)

Падобныя паказанні

• Стварыце новую кнігу і захавайце з дапамогай VBA ў Excel
• Excel VBA: Стварыце новую працоўную кнігу і назавіце яе (6 прыкладаў)
• Як стварыць новы аркуш з шаблону з дапамогай макраса ў Excel

📌 Крок 2: Напішыце і захавайце неабходны код VBA

Цяпер вам трэба напісаць код у модулі і захаваць яго.

• У каб зрабіць гэта, націсніце опцыю Module1 і напішыце наступны код у акне кода.

41811332

• Як у выніку акно кода будзе выглядаць наступным чынам.

🔎 Тлумачэнне кода:

♣ Сегмент 1:

6593

У гэтай частцы мы аб'явілі назву макраса і назву зменнай es.

♣ Сегмент 2:

7489

У гэтай частцы мы стварылі поле ўводу. З дапамогай гэтага поля ўводу мы можам увесці назву файла, які нам трэба знайсці.

♣ Сегмент 3:

9449

У гэтай частцы мы правяраем, ці існуе неабходны аркуш у працоўнай кніжцы. Калі не, будзе створаны неабходны аркуш і паказана паведамленне аб гэтай змене.

♣ Сегмент 4:

1390

У гэтай частцы мы працавалі з вынікам, калі патрэбны аркуш ужо існуе ў кнізе. У гэтым выпадку з'явіцца іншае акно паведамлення, якое інфармуе вас аб тым, што гэты ліст існуе. Акрамя таго, у гэтай частцы мы правільна заканчваем код.

• Пасля націсніце Ctrl + S.

• Пасля гэтага з'явіцца акно Microsoft Excel . Націсніце на кнопку Не .

• У выніку з'явіцца акно Захаваць як .
• Далей абярыце опцыю Захаваць як тып: у фармаце .xlsm . Затым націсніце на кнопку Захаваць .

Такім чынам, вы напісалі і захавалі неабходны код.

Заўвага:

Вы павінны захаваць кнігу Excel у фармаце .xlsm . У адваротным выпадку макрас не будзе ўключаны, і код не будзе працаваць.

Больш падрабязна: Excel VBA для дадання аркуша з назвай зменнай (5 ідэальных прыкладаў)

📌 Крок 3: Запусціце код

Цяпер вам трэба запусціць код і праверыць вынікі.

• Для гэтага, перш за ўсё, націсніце на значку Выканаць у акне Microsoft Visual Basic для прыкладанняў .

• У выніку, з'явіцца акно Макрасы .
• Пасля гэтага абярыце макрас AddSheetIfNotExist і націсніце кнопку Выканаць .

• У гэты час створанае намі акно паведамленняўз'явіцца назва Дадаць ліст, калі ён не існуе . Тут аўтаматычны варыянт будзе Аркуш5 .

• Цяпер для праверкі напішыце «красавік» у тэкставым полі і націсніце кнопку ОК .

• Пасля гэтага вы ўбачыце яшчэ адно паведамленне з'явіцца поле, якое паведамляе, што аркуш ужо існуе.
• Націсніце кнопку ОК .

• Пасля гэтага запусціце код яшчэ раз і напішыце «Май» у тэкставым полі створанага паведамлення. Пасля гэтага націсніце кнопку ОК .

• У выніку вы ўбачыце іншае акно паведамлення, якое з'явіцца інфармаванне аб тым, што аркуш «Май» не існаваў, і такім чынам быў створаны гэты аркуш.
• Пасля гэтага націсніце кнопку ОК .

Нарэшце, вы бачыце, што дадалі аркуш, якога раней не існавала. І рабочая кніга цяпер будзе выглядаць так.

Больш падрабязна: Excel VBA: дадаць аркуш пасля апошняга (3 ідэальныя прыклады)

Выснова

Такім чынам, у гэтым артыкуле я паказаў вам усе крокі для дадання аркуша, калі яго няма ў Excel VBA. Уважліва прачытайце артыкул цалкам, каб лепш зразумець яго і дасягнуць жаданага выніку. Спадзяюся, вы знойдзеце гэты артыкул карысным і інфарматыўным. Калі ў вас ёсць дадатковыя пытанні ці рэкамендацыі, калі ласка, не саромейцеся звязацца са мной.

І наведайце ExcelWIKI для многіх іншыхтакія артыкулы. Дзякуй!