VBA Rename Sheet

Renumiți foaia de calcul în Excel VBA

Renumirea oricărei foi de calcul Excel este la fel de ușoară ca și redenumirea oricărui fișier. Acest lucru se poate face făcând dublu clic pe orice nume de foaie de lucru sau selectând Rename (Redenumire) din lista de meniu din dreapta. Dar ce se întâmplă dacă dorim să redenumim o foaie de lucru excel cu ajutorul macro VBA. Cu ajutorul macro VBA, putem redenumi una sau mai multe foi de lucru Excel dintr-o singură lovitură. Putem chiar să fixăm numele oricărei foi de lucru pentru a evita să fie schimbat de oricine. Aici, vom vedea, mai multe moduri de a redenumi orice foaie de lucru.

Cum redenumiți foaia de calcul în Excel folosind VBA?

Mai jos sunt diferite exemple de redenumire a foii de calcul în Excel folosind codul VBA.

VBA Rename Sheet – Example #1

Deși este foarte ușor să redenumiți orice foaie de lucru Excel cu ajutorul VBA. Există, de asemenea, multe modalități de a face acest lucru. Aici, numele foii noastre de lucru este setat în mod implicit ca „Sheet1”, așa cum se arată mai jos, pe care o vom redenumi.

Pasul 1: Pentru acest exemplu, am avea nevoie de un modul în care vom face codificarea. Mergeți la meniul Insert și selectați Module așa cum se arată mai jos.

Pasul 2: Acum, în modulul nou deschis, scrieți subcategoria cu numele VBA Rename Sheet sau cu orice alt nume.

Code:

Sub VBA_RenameSheet()End Sub

Pasul 3: Acum definiți o variabilă cu orice nume și atribuiți-o cu tipurile de date Worksheet așa cum se arată mai jos. Aici, am numit-o „Sheet”.

Cod:

Sub VBA_RenameSheet()Dim Sheet As WorksheetEnd Sub

Pasul 4: Cu ajutorul comenzii Set, selectați variabila Sheet, așa cum se arată mai jos.

Code:

Sub VBA_RenameSheet()Dim Sheet As WorksheetSet Sheet =End Sub

Pasul 5: Și selectați foaia de lucru pe care trebuie să o redenumim cu ajutorul comenzii Worksheet.

Code:

Sub VBA_RenameSheet()Dim Sheet As WorksheetSet Sheet = Worksheets("Sheet1")End Sub

Pasul 6: Acum folosiți funcția Sheet împreună cu Name, și atribuiți numele pe care dorim să îl redenumim. Aici alegem „Renamed Sheet”.

Code:

Sub VBA_RenameSheet()Dim Sheet As WorksheetSet Sheet = Worksheets("Sheet1")Sheet.Name = "Renamed Sheet"End Sub

Pasul 7: Acum, în cele din urmă, compilați codul și rulați-l în cazul în care există o eroare găsită. Pentru a rula codul, faceți clic pe butonul Play (Redare) situat sub bara de meniu, așa cum se arată mai jos. Vom vedea, foaia noastră va fi redenumită din Sheet1 în Renamed Sheet, așa cum se arată mai jos.

VBA Rename Sheet – Example #2

În acest exemplu, vom vedea un mod mult mai ușor de a redenumi orice foaie de lucru cu ajutorul macro VBA. Pentru aceasta, vom avea nevoie, de un alt modul proaspăt.

Pasul 1: Deschideți un modul și scrieți subcategoria VBA Rename așa cum se arată mai jos.

Cod:

Sub VBA_RenameSheet1()End Sub

Pasul 2: Selectați foaia pe care dorim să o redenumim cu funcția Select. Aici foaia noastră este Sheet1.

Code:

Sub VBA_RenameSheet1()Sheets("Sheet1").SelectEnd Sub

Pasul 3: În linia următoare, luați în considerare funcția Name cu foaia selectată, așa cum se arată mai jos.

Code:

Sub VBA_RenameSheet1()Sheets("Sheet1").SelectSheets("Sheet1").Name =End Sub

Pasul 4: Alegeți numele pe care dorim să îl dăm după redenumirea foii. Alegem același nume ca și în exemplul-1 ca „Renamed Sheet”

Sub VBA_RenameSheet1()Sheets("Sheet1").SelectSheets("Sheet1").Name = "Renamed Sheet"End Sub

Pasul 5: Compilați din nou codul și rulați-l. Vom vedea că foaia1 va fi redenumită cu un nou nume ca „Foaie redenumită”.

VBA Rename Sheet – Exemplul #3

Există din nou încă o modalitate similară de redenumire a unei foi de calcul Excel cu ajutorul VBA. Acesta ar arăta puțin asemănător cu procesul pe care l-am văzut în exemplul-2, dar mult mai ușor de reținut și de procesat.

Pasul 1: Deschideți un modul și scrieți noua subcategorie de VBA Rename Sheet așa cum se arată mai jos.

Cod:

Sub VBA_RenameSheet2()End Sub

Pasul 2: Selectați foaia pe care dorim să o redenumim. Aici putem selecta foaia punând secvența Sheet în paranteze, așa cum se arată mai jos. Astfel, nu trebuie să scriem numele Foii care urmează să fie redenumită. Doar secvența acelei foi va funcționa.

Code:

Sub VBA_RenameSheet2()Sheets(1).SelectEnd Sub

Pasul 3: În următoarea linie, luați în considerare funcția Name (Nume) cu secvența foii selectate, așa cum se arată mai jos.

Code:

Sub VBA_RenameSheet2()Sheets(1).SelectSheets(1).Name =End Sub

Pasul 4: Acum introduceți numele pe care dorim să îl dăm foii selectate Sheet1. Să considerăm numele pe care l-am văzut în exemplele de mai sus ca fiind „Foaie redenumită”.

Code:

Sub VBA_RenameSheet2()Sheets(1).SelectSheets(1).Name = "renamed Sheet"End Sub

Pasul 5: Acum compilați din nou codul și rulați. Vom observa că Sheet1 este acum redenumit din nou în „foaie redenumită”, așa cum se arată mai jos.

VBA Rename Sheet – Exemplul #4

În acest exemplu, vom vedea cum să redenumim orice foaie de lucru cu o singură linie de cod.

Pasul 1: Deschideți un modul și scrieți subcategoria VBA Rename Sheet așa cum se arată mai jos.

Code:

Sub VBA_RenameSheet3()End Sub

Pasul 2: Selectați secvența de foi pe care dorim să o redenumim împreună cu funcția Name și dați un nume cu care dorim să redenumim acea foaie, așa cum se arată mai jos.

Code:

Sub VBA_RenameSheet3()Sheets(1).Name = "rename Sheet"End Sub

Pasul 3: Acum pur și simplu rulați codul pentru a-l implementa. Vom observa din nou că Sheet1 este acum redenumit ca „rename Sheet”

Pros of Excel VBA Rename Sheet

• Dacă avem mai multe foi care trebuie redenumite, atunci utilizarea codului VBA este mult mai bună decât procesul manual.
• Putem schimba numele oricărei foi de lucru Excel printr-o singură linie de cod VBA pe care am văzut-o în exemplul-4.
• Deși schimbarea manuală a numelui oricărei foi este, de asemenea, o modalitate simplă de a face acest lucru. Dar VBA Rename Sheet este destul de util atunci când creăm o foaie nouă și dorim să o separăm de alte foi doar pentru a o clasifica.

Ce lucruri de reținut

• Pentru a obține o vizualizare mai bună a modificărilor care au loc, păstrați fereastra VBA paralelă cu foaia Excel, astfel încât schimbarea numelui foii să fie vizibilă în mod clar.
• Salvarea fișierului după terminarea lucrului în formatul Macro enable ne va permite să păstrăm codul și pentru lucrări viitoare.
• Automatizarea procesului de schimbare a numelui foii ne va ajuta la reducerea timpului de clasificare a foilor și a datelor.

Articole recomandate

Acesta este un ghid pentru VBA Rename Sheet. Aici discutăm despre cum să redenumiți foaia în Excel folosind codul VBA, împreună cu câteva exemple practice și un șablon excel descărcabil. De asemenea, puteți parcurge și celelalte articole sugerate de noi –

1. VBA Workbook
2. VBA Name Worksheet
3. VBA Unprotect Sheet
4. VBA Protect Sheet

.