Com afegir un full amb nom a Excel VBA (6 maneres fàcils)

Hugh West

02-06-2023 Macros i amp; Excel VBA
  • Comparteix Això
Hugh West

Aquest article ofereix les respostes a les vostres preguntes sobre com afegir un full amb nom a Excel VBA . Si estàs buscant aquest tipus de trucs únics, has vingut al lloc correcte. Aquí parlarem de 6 fàcil i amp; maneres provades d'afegir un full amb un nom a l'Excel VBA .

Baixeu el quadern de pràctiques

Podeu baixar el quadern d'Excel següent per entendre's millor i practicar-lo.

Afegir un full amb Name.xlsm

Codi VBA per afegir un full amb nom

Utilitzarem l' objecte Sheets per afegir un full en Excel. El codi VBA fonamental per afegir un full amb el nom s'assembla al següent.

Sheets.Add ([Before], [After], [Count], [Type])

Abans: És opcional. Afegeix un full nou abans d'un full específic.

Després: També és opcional. Afegeix un full nou després d'un full específic.

Recompte: També és un paràmetre opcional. Indica el nombre de fulls que cal afegir.

Tipus: També és opcional. Especifica el tipus de fulla. Aquí, el valor predeterminat és xlWorksheet .

6 maneres diferents d'afegir un full amb nom a Excel VBA

A Excel, podem afegir un nou full amb l'afegit ⊕ icona al costat del nom del full. Alguna vegada has pensat a automatitzar la mateixa tasca a Excel? No t'ho pensis més, perquè VBA t'ha cobert.

Aquí tenim un full de treball anomenat Informe de vendes . Conté les vendes diàriesInforme d'una determinada cafeteria. A les columnes B , C i D , hi ha noms de Representants de vendes , Articles i Quantitat respectivament.

Aquí, afegirem altres fulls en aquest llibre de treball amb l'ajuda de la macro VBA .

Aquí, hem utilitzat la versió Microsoft Excel 365 , podeu utilitzar qualsevol altra versió segons la vostra conveniència.

1. Afegir un full amb nom a Excel VBA

En el nostre primer mètode, afegirem un full amb el nom de l' entrada de l'usuari . Si teniu curiositat per aprendre, seguiu aquests senzills passos.

📌 Passos:

  • Al principi, aneu a la Pestanya Desenvolupador .
  • En segon lloc, seleccioneu Visual Basic al grup Codi .
  • Com a alternativa, premeu ALT + F11 per fer la mateixa tasca.

Nota: Assegureu-vos de prémer la tecla ALT a l'esquerra de la BARRA ESPAIOR . L'operació no s'executaria si utilitzeu altres tecles ALT .

  • A l'instant, s'obre la finestra Microsoft Visual Basic per a aplicacions .
  • Més endavant, aneu a la pestanya Insereix .
  • A continuació, seleccioneu Mòdul de les opcions.

  • En l'actualitat, obre el codi Mòdul .
  • Després, escriu el codi següent al Mòdul . 
3132

Desglossament del codi

  • En primer lloc, anomenem el procediment Sub com Afegeix_full_amb_nom .
  • A continuació, definim els tipus de variables.
  • Més tard, hem afegit la instrucció On Error Resume Next . Això ignorarà qualsevol error.
  • Després, hem utilitzat InputBox per obtenir el nom del full de l'usuari. A més, hem emmagatzemat la cadena de text del InputBox a la variable sheet_name .
  • A continuació, si el sheet_name està buit, el codi no procedirà.
  • Finalment, estem utilitzant el mètode Add.Name per anomenar el full de nova creació. Aquí, el nom serà el mateix que la variable sheet_name .

  • En aquest moment, premeu Executar (⏵) icona. Més aviat, podeu prémer F5 al teclat.

  • De sobte, s'obre un quadre d'entrada.
  • Aquí, introduïu el nom del nou full. En aquest cas, hem escrit Guany al quadre.
  • Més endavant, feu clic a D'acord .

  • Per tant, el nostre codi s'executarà i afegirà un full anomenat Profit .

Nota: No hem esmentat cap lloc per al nostre full. De manera predeterminada, es col·loca abans del full actiu.

Llegir més: Excel VBA per afegir un full a un altre llibre de treball (3 exemples útils)

2. Aplicació d'Excel VBA per afegir un full amb nom abans del full específic

En el nostre segon mètode, afegirem un full amb el nom abans d'un full específic. Explorem el procés pas a paspas.

📌 Passos:

  • En primer lloc, obre la finestra del codi Mòdul tal com es mostra a Mètode 1 .
  • En segon lloc, escriviu-hi el codi següent. 
9620

Desglossament del codi

  • En primer lloc, anomenem el procediment Sub com a Add_Sheet_Before_Specific_Sheet .
  • A continuació, activem el full Informe de vendes . D'aquesta manera, s'assegurarà que el codi s'executarà si estem en un altre full.
  • A continuació, estem utilitzant el mètode Add.Name per anomenar el full nou creat. Aquest full es crearà abans que el full anomenat Guany del llibre de treball. A més, hem anomenat el full com a Balance .

  • Després, executeu el codi tal com es mostra a Mètode 1 .
  • Així, afegirà un nou full Balance abans del full anomenat Guany .

Llegir més: Excel VBA per afegir un full amb nom de variable (5 exemples ideals)

3. Ús d'Excel VBA per afegir un full amb el nom després del full específic

En aquest mètode, afegirem un full després del full anomenat Guany . Vegem el procés en detall.

📌 Passos:

  • Al principi, obre el codi Mòdul finestra tal com es mostra a Mètode 1 .
  • Després, escriviu-hi el codi següent. 
5528

Aquest codi és gairebé semblant al codi de Mètode 2 . Només aquí hem utilitzat el paràmetre Després més aviatque Abans . Com que volem afegir el full nou després d'un full específic.

  • Després, executeu el codi tal com es mostra a Mètode 1 .
  • Així, afegirà un nou full Magatzem després del full anomenat Guany .

Llegir més: Excel VBA per afegir un full si no existeix (amb passos ràpids)

4. Inserció del full amb el nom a l'inici del llibre de treball

En aquesta secció, inserirem un full nou a l'inici del llibre de treball a Excel mitjançant VBA . Per tant, sense més demora, veurem com ho fem.

📌 Passos:

  • En principi, s'obre el codi Finestra del mòdul tal com es mostra a Mètode 1 .
  • Després, escriviu-hi el codi següent. 
8905

Aquí hi estem afegint el nou full de treball abans del primer full del llibre de treball. És a dir, a l'inici del llibre de treball. Com a resultat, ara és el primer full. A més, vam anomenar el full Perfil de l'empresa .

  • A continuació, executeu el codi tal com es mostra a Mètode 1 .
  • Per tant, afegirà un nou full Perfil de l'empresa a l'inici del llibre de treball.

Llegir més: Macro d'Excel: crear un full nou i canviar el nom (3 exemples ideals)

5. Utilitzar Excel VBA per afegir un full al final del llibre de treball

En aquesta secció, afegirem un full després de l'últim full del llibre de treball . Permeteu-me que us mostri el procésa continuació.

📌 Passos:

  • Primer, obriu la finestra del codi Mòdul tal com es mostra a Mètode 1 .
  • En segon lloc, enganxeu-hi el codi següent. 
5207

Desglossament del codi

  • En primer lloc, anomenem el procediment Sub com a Sheet_End_Workbook.
  • A continuació, estem utilitzant el mètode Add.Name per anomenar el full nou creat. Crearem aquest full després de l'últim full del quadern. Podem obtenir l'últim número de full de la propietat Fulls.Recompte . A més, hem anomenat el full Compte de resultats .

  • Després, executeu el codi tal com es mostra a Mètode 1 .
  • Per tant, afegirà un nou full Declaració de resultats al final del llibre de treball.

Llegir més: Creeu un llibre de treball nou i deseu amb VBA a Excel

6. Presentació de diversos fulls amb valor de cel·la per Excel VBA

Per a l'últim mètode, afegirem diversos fulls al llibre de treball amb el nom d'un rang de cel·les mitjançant Excel VBA . A més, demanarem a l'usuari l'entrada del rang per prendre el nom. Per tant, fem una ullada als passos següents.

📌 Passos:

  • Al principi, obriu el codi Finestra del mòdul tal com es mostra a Mètode 1 .
  • Després, copieu el codi següent i enganxeu-lo. 
9854

Desglossament del codi

  • En primer lloc, anomenem el subprocediment com Add_Multiple_Sheets_Using_Cell_Value.
  • A continuació, definim els tipus de variables.
  • Després, fem servir InputBox per obtenir l'interval de dades de l'usuari.
  • En quart lloc, activem el full Informe de vendes .
  • Més endavant, fem servir un bucle For Each Next per recórrer l'interval de cel·les seleccionat una per una.
  • A continuació, estem utilitzant el mètode Afegeix.Nom per anomenar el full de nova creació. Crearem aquests fulls després del full actiu Informe de vendes del llibre de treball.

  • Ara, executeu el codi tal com es mostra a Mètode 1 .
  • A l'instant, s'obre el quadre d'entrada Exceldemy .
  • A continuació, doneu les cel·les a B5:B9 rang al quadre.
  • Per últim, feu clic a D'acord .

  • Finalment, s'inserirà cinc fulls amb el nom dels valors de les cel·les de l'interval B5:B9 . Tots estan després del full Informe de vendes .

Conclusió

Aquest article ofereix solucions senzilles i breus per afegir fulls amb noms d'Excel VBA . No us oblideu de baixar el fitxer Pràctica . Gràcies per llegir aquest article, esperem que hagi estat útil. Feu-nos-ho saber a la secció de comentaris si teniu cap consulta o suggeriment. Visiteu el nostre lloc web Exceldemy per explorar-ne més.

Publicació anterior VBA per amagar files a Excel (14 mètodes)
Següent post Com ajustar el full d'Excel en una pàgina de Word (3 maneres senzilles)

Hugh West és un entrenador i analista d'Excel molt experimentat amb més de 10 anys d'experiència en el sector. És llicenciat en Comptabilitat i Finances i Màster en Administració i Direcció d'Empreses. Hugh té una passió per l'ensenyament i ha desenvolupat un enfocament pedagògic únic que és fàcil de seguir i entendre. El seu coneixement expert d'Excel ha ajudat a milers d'estudiants i professionals de tot el món a millorar les seves habilitats i a destacar en les seves carreres. A través del seu bloc, Hugh comparteix els seus coneixements amb el món, oferint tutorials d'Excel gratuïts i formació en línia per ajudar les persones i les empreses a assolir tot el seu potencial.