Excel VBA por aldoni folion se ĝi ne ekzistas (kun rapidaj paŝoj)

  • Kundividu Ĉi Tion
Hugh West

Excel VBA estas potenca kaj oportuna ilo por plenumi taskojn sufiĉe rapide en granda kvanto. Vi povas apliki plurajn kondiĉojn kaj derivi malsamajn rezultojn surbaze de la individuaj kondiĉoj per VBA. Nun, foje, vi eble volas kontroli ĉu aparta folio ekzistas en via laborlibro. Kaj, se ne, vi eble bezonos krei tiun folion. En ĉi tiu artikolo, mi montros al vi ĉiujn paŝojn por aldoni folion se ĝi ne ekzistas, uzante Excel VBA.

Excel VBA: Aldonu folion se ĝi ne ekzistas. (Rapida Vido)

9667

Enigu en novan modulon por apliki la ĉi-supran kodon.

Elŝutu Praktikan Laborlibron

Vi povas elŝuti nian praktikan librolibron de ĉi tie senpage!

Aldonu Folion se Ĝi Ne Ekzistas.xlsm

Paŝoj por Apliki VBA-Kodon por Aldoni Folion en Excel Se Ĝi Ne Ekzistas

Diru, vi havas laborlibron enhavantan 4 laborfoliojn nomitajn januaro, februaro, marto kaj aprilo. Ĉiu folio enhavas la vendan raporton de la sekva monato. Nun vi devas trovi kelkajn foliojn en la libro kaj aldoni la folion se ĝi ne ekzistas. Vi povas sekvi la paŝon post paŝo gvidliniojn sube por plenumi ĉi tion.

📌 Paŝo 1: Enigu Novan Modulon

Unue, vi devas enmeti modulo por skribi VBA-kodon.

  • Por fari tion, komence, iru al la Ellaboranto langeto >> Visual Basic ilo.

  • Kiel rezulto, la Microsoft VisualBaza por Aplikoj aperos.
  • Poste, iru al la Enmeti langeton >> Modulo ilo.

Tiele, nova modulo nomita Modulo1 estis kreita.

Legu Pli: Kiel Aldoni Folion per Nomu en Excel VBA (6 Facilaj Manieroj)

Similaj Legoj

  • Kreu Novan Laborlibron kaj Konservu Uzante VBA en Excel
  • Excel VBA: Kreu Novan Laborlibron kaj Nomu ĝin (6 Ekzemploj)
  • Kiel Krei Novan Folion el Ŝablono Uzante Makroon en Excel

📌 Paŝo 2: Skribu kaj Konservu la Bezonatan VBA-Kodon

Nun, vi devas skribi la kodon ene de la modulo kaj konservi ĝin.

  • En por fari tion, alklaku la opcion Modulo1 kaj skribu la jenan kodon en la kodfenestro.
28464886

  • Kiel rezulto, la kodfenestro aspektos kiel jena.

🔎 Koda Klarigo:

Segmento 1:

3463

En ĉi tiu parto, ni deklaris la makronomo kaj variablo nomo es.

Segmento 2:

4707

En ĉi tiu parto, ni kreis enigkeston. Per ĉi tiu enigkesto, ni povas preni la enigon de la nomo de la dosiero, kiun ni bezonas trovi.

Segmento 3:

8246

En ĉi tiu parto, ni kontrolas ĉu la bezonata folio ekzistas en la laborlibro. Se ne, ĝi kreus la bezonatan folion kaj montrus al ni mesaĝon pri ĉi tiu ŝanĝo.

Segmento 4:

3982

En ĉi tiu parto, ni laboris kun la rezulto se la bezonata folio jam ekzistas en la laborlibro. En ĉi tiu scenaro, alia mesaĝkesto aperos informante vin, ke ĉi tiu folio ekzistas. Krome, en ĉi tiu parto, ni finas la kodon ĝuste.

  • Poste, premu Ctrl + S.

  • Poste, aperos Microsoft Excel fenestro. Alklaku la Ne butonon.

  • Kiel rezulto, aperos la fenestro Konservi kiel .
  • Sekve, elektu la opcion Konservi kiel tipo: kiel .xlsm -formaton. Poste, alklaku la butonon Konservi .

Tiel vi skribis kaj konservis vian postulatan kodon.

Noto:

Vi devas konservi la Excel-laborlibron en .xlsm formato. Alie, la makroo ne estos ebligita kaj la kodo ne funkcios.

Legu Pli: Excel VBA por Aldoni Folion kun Varia Nomo (5 Idealaj Ekzemploj)

📌 Paŝo 3: Ruli la Kodon

Nun, vi devas ruli la kodon kaj kontroli la rezultojn.

  • Por fari tion, unue kaj ĉefe, alklaku sur la Run ikono en la fenestro Microsoft Visual Basic por Aplikoj .

  • Kiel rezulto, aperos la fenestro Makrooj .
  • Poste elektu la makroon AddSheetIfNotExist kaj alklaku la butonon Run .

  • Nun ĉi tiu momento, nia kreita mesaĝkestonomita Aldoni Folio Se Ne Ekzistas aperos. Ĉi tie, la aŭtomata opcio estus Sheet5 .

  • Nun, por kontroli, skribu “aprilo” en la tekstujo kaj alklaku la butonon Ok .

  • Sekve, vi vidos, ke alia mesaĝo skatolo aperus dirante al vi, ke la folio jam ekzistas.
  • Alklaku la butonon Ok .

  • Poste, rulu la kodon denove kaj skribu "Majo" en la tekstkesto de la kreita mesaĝkesto. Poste, alklaku la butonon OK .

  • Kiel rezulto, vi vidos alian mesaĝkeston kiu estos aperas informante vin, ke la “Majo” folio ne ekzistis kaj tiel ĝi kreis ĉi tiun folion.
  • Sekve, alklaku la butonon OK .

Fine, vi povas vidi, ke vi aldonis folion, kiu antaŭe ne ekzistis. Kaj, la laborlibro nun aspektus tiel.

Legu Pli: Excel VBA: Aldonu Folion Post La Laste (3 Idealaj Ekzemploj)

Konkludo

Do, en ĉi tiu artikolo, mi montris al vi ĉiujn paŝojn por aldoni folion se ne ekzistas kun Excel VBA. Trarigardu la plenan artikolon zorge por kompreni ĝin pli bone kaj atingi vian deziratan rezulton. Mi esperas, ke vi trovos ĉi tiun artikolon utila kaj informa. Se vi havas pliajn demandojn aŭ rekomendojn, bonvolu kontakti min.

Kaj, vizitu ExcelWIKI por multaj pliaj.artikoloj kiel ĉi tio. Dankon!

Hugh West estas tre sperta Excel-trejnisto kaj analizisto kun pli ol 10 jaroj da sperto en la industrio. Li tenas bakalaŭron en Kontado kaj Financo kaj magistron en Komercadministracio. Hugh havas entuziasmon por instruado kaj evoluigis unikan instruan aliron kiu estas facile sekvi kaj kompreni. Lia sperta scio pri Excel helpis milojn da studentoj kaj profesiuloj tutmonde plibonigi siajn kapablojn kaj elstari en siaj karieroj. Per sia blogo, Hugh dividas sian scion kun la mondo, proponante senpagajn Excel-lernilojn kaj interretan trejnadon por helpi individuojn kaj entreprenojn atingi sian plenan potencialon.