Nevezze át a lapot az Excel VBA-ban

Bármely excel munkalap átnevezése ugyanolyan egyszerű, mint bármely fájl átnevezése. Ezt megteheti dupla kattintással bármely munkalap nevére, vagy a jobb oldali menüben válassza az Átnevezés lehetőséget. De mi van, ha át akarjuk nevezni egy excel munkalapot a VBA makró segítségével. A VBA Macro segítségével egyetlen felvételben átnevezhetünk egy vagy több Excel-munkalapot. Még bármilyen munkalap nevét kijavíthatjuk, hogy senki ne változtassa meg. Itt láthatjuk, hogy bármilyen munkalap átnevezhető több módon.

Hogyan lehet átnevezni a lapot az Excel programban a VBA használatával?

Az alábbiakban bemutatjuk a Példák a Sheet átnevezésére az Excel alkalmazásban VBA-kóddal.

Itt töltheti le a VBA Átnevező Sheet Excel sablont - VBA Rename Sheet Excel Template

VBA Lap átnevezése - 1. példa

Bár nagyon könnyű bármilyen Excel munkalapot átnevezni a VBA segítségével. Számos módszer van erre. Itt a munkalap neve alapértelmezés szerint „Sheet1”, az alább látható módon, amelyet átnevezünk.

1. lépés: Ehhez a példához egy modulra lenne szükség, ahol elvégezzük a kódolást. Lépjen a Beszúrás menübe, és válassza az alább látható módon a Modul elemet.

2. lépés: Írja be az újonnan megnyílt modulba az alkategóriát a VBA Rename Sheet névre vagy bármely más névre.

Kód:

 Sub VBA_RenameSheet () Sub

3. lépés: Most definiáljon egy változót bármilyen névben, és rendelje hozzá a Munkalap adattípusaihoz, az alább látható módon. Itt „ Sheet ” -nek neveztük.

Kód:

 Sub VBA_RenameSheet () Dim Sheet as Workheet End Sub

4. lépés: A Set parancs segítségével válassza ki a Lapváltozót az alább látható módon.

Kód:

 Sub VBA_RenameSheet () Dim Sheet as Munkalap Set Sheet = Befejezés Sub

5. lépés: És válassza ki a Munkalapot, amelyet át kell nevezni a Munkalap parancs segítségével.

Kód:

 Sub VBA_RenameSheet () Dim Sheet as Munkalap Set Sheet = Munkalapok ("Sheet1") End Sub

6. lépés: Most használja a Lap funkciót a Név mellett, és rendelje hozzá a nevet, amelyet át akarunk nevezni. Itt a „ Átnevezett lap ” lehetőséget választjuk.

Kód:

 Sub VBA_RenameSheet () Dim Sheet as Munkalap Set Sheet = Munkalapok ("Sheet1") Sheet.Name = "Átnevezett lap" End Sub

7. lépés: Végül fordítsa le a kódot, és futtassa le, ha hiba található. A kód futtatásához kattintson a lejátszás gombra, amely a menüsor alatt található, az alább látható módon. Látni fogjuk, hogy a lapunkat az 1. lapról az átnevezett lapra nevezzük át, az alább látható módon.

VBA Lap átnevezése - 2. példa

Ebben a példában sokkal könnyebb módszert látunk bármilyen munkalap átnevezésére a VBA makró segítségével. Ehhez szükségünk lenne egy újabb friss modulra.

1. lépés: Nyisson meg egy modult és írja be a VBA átnevezés alkategóriáját az alább látható módon.

Kód:

 Sub VBA_RenameSheet1 () Sub

2. lépés: Válassza ki azt a lapot, amelyet át akarunk nevezni a Select funkcióval. Itt a Sheet1 lap található.

Kód:

 Sub VBA_RenameSheet1 () Sheets ("Sheet1"). Válassza az End Sub elemet

3. lépés: A következő sorban vegye figyelembe a Név funkciót a kiválasztott lapon az alább látható módon.

Kód:

 Sub VBA_RenameSheet1 () Sheets ("Sheet1"). Select Sheets ("She11"). Name = Befejezés Sub

4. lépés: Válassza ki azt a nevet, amelyet megadni akarunk a lap átnevezése után. Ugyanazt a nevet választjuk, mint az 1. példában, mint a „ Átnevezett lap ”

 Sub VBA_RenameSheet1 () Sheets ("Sheet1"). Select Sheets ("Sheet1"). Name = "Átnevezett lap" End Sub

5. lépés: Fordítsa újra a kódot, és futtassa. Látni fogjuk, hogy a lap1 új névvel átnevezésre kerül: „ Átnevezett lap ”.

VBA Lap átnevezése - 3. példa

Megint van egy hasonló módszer az Excel munkalap átnevezésére a VBA segítségével. Ez kissé hasonló ahhoz a folyamathoz, amelyet a 2. példában láttunk, ám sokkal könnyebb megjegyezni és feldolgozni.

1. lépés: Nyisson meg egy modult és írja be a VBA Átnevezés lap új alkategóriáját az alább látható módon.

Kód:

 Sub VBA_RenameSheet2 () Sub

2. lépés: Válassza ki az átnevezni kívánt lapot. Itt a lapot úgy választhatjuk meg, hogy a lap sorozatát zárójelek közé helyezzük, az alább látható módon. Tehát nem kell írnunk az átnevezni kívánt Sheet nevét. Csak az a lap sorozat működne.

Kód:

 Sub VBA_RenameSheet2 () Sheets (1) .Válasszon Sub Sub végét

3. lépés: A következő sorban vegye figyelembe a Név funkciót a kiválasztott lapszekvenciával, az alább látható módon.

Kód:

 Al VBA_RenameSheet2 () lapok (1) .Válasszon lapok (1) .Name = Befejezés al

4. lépés: Most írja be a nevet, amelyet megadni akarunk a kiválasztott 1. lapnak. Tekintsük azt a nevet, amelyet a fenti példákban „ Sheet ” -nek hívtunk .

Kód:

 Al VBA_RenameSheet2 () lapok (1) .Válasszon lapok (1) .Name = "átnevezték a lapot" End Sub

5. lépés: Most fordítsa újra a kódot, és futtassa. Megfigyeljük, hogy a Sheet1 mostantól újra „r enamed Sheet ” elnevezésű, az alább látható módon.

VBA Lap átnevezése - 4. példa

Ebben a példában meglátjuk, hogyan lehet minden munkalapot átnevezni egyetlen kódsorral.

1. lépés: Nyisson meg egy modult és írja be a VBA Átnevezés lap alkategóriáját az alább látható módon.

Kód:

 Sub VBA_RenameSheet3 () Sub

2. lépés: Válassza ki az átnevezni kívánt lapszekvenciát a Név funkcióval együtt, és adjon nevet, amellyel átnevezni szeretnénk a lapot, az alább látható módon.

Kód:

 Sub VBA_RenameSheet3 () Sheets (1) .Name = "átnevezzék a lapot" End Sub

3. lépés: Most egyszerűen futtassa a kódot annak végrehajtásához. Megint megfigyeljük, hogy a Sheet1 ma már „ Sheet átnevezése ”

Az Excel VBA átnevezési lapjának előnyei

  • Ha több lapot is átnevezhetünk, akkor a VBA kód használata sokkal jobb, mint a kézi folyamat.
  • Bármely excel munkalap nevét megváltoztathatjuk egy soros VBA kóddal, amelyet a 4. példában láthattunk.
  • Bár a lapok nevének manuális megváltoztatása is egyszerű módja annak. De a VBA Átnevező Lap nagyon hasznos, amikor új lapot készítünk, és azt szeretnénk elválasztani más lapoktól, hogy csak kategorizáljuk.

Dolgok, amikre emlékezni kell

  • A változások jobb áttekintése érdekében tartsa a VBA ablakot párhuzamosan az excel lappal, hogy a lapon névre való váltás jól látható legyen.
  • A fájl mentése a munka elvégzése után a Makro engedélyezési formátumban lehetővé teszi a kód megőrzését a jövőbeni munkához is.
  • A lapnév megváltoztatásának automatizálása segít csökkenteni a lapok és az adatok kategorizálásának idejét.

Ajánlott cikkek

Ez egy útmutató a VBA Átnevezés laphoz. Itt tárgyaljuk, hogyan lehetne átnevezni a Sheet-t Excel-ben VBA-kód használatával, néhány gyakorlati példával és letölthető Excel sablonnal együtt. Megnézheti más javasolt cikkeinket -

  1. Teljes útmutató a VBA munkafüzethez
  2. KÖZVETLEN funkció az Excelben
  3. Oktatóanyagok a VBA gróf funkcióról
  4. Hogyan kell használni az Excel XOR funkciót?

Kategória:

VBA