Lépés 1: Kattintson a jobb gombbal annak a munkalapnak a nevére, amelyet dinamikusan cellaértékkel nevez el, és válassza ki Kód megtekintése a jobb egérgombbal kattintva.

Lépés 2: A megnyitón Microsoft Visual Basic for Applications ablakba, illessze be a következő VBA-kódot a modul ablakába.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set Target = Range("A1")
If Target = "" Then Exit Sub
Application.ActiveSheet.Name = VBA.Left(Target, 31)
Exit Sub
End Sub

Tipp: Ez a VBA dinamikusan átnevezi a munkalapot az A1 cellában lévő érték alapján, az "A1" értéket az Ön igényei szerint módosíthatja más cellákra.

Lépés 3: Mentse el a VBA kódot, és zárja be Microsoft Visual Basic alkalmazásokhoz ablak.

Ekkor látni fogja, hogy a lap neve dinamikusan megváltozik a megadott cellaérték alapján.

1. Kattints Kutools Plus > Munkalap > Munkalapok átnevezése. Lásd a képernyőképet:
   
2. A megnyitón Több munkalap átnevezése párbeszédpanelt, kérjük, tegye a következőket:
   1. A munkalapok listában ellenőrizze az átnevezni kívánt munkalapokat.
   2. A Opciók átnevezése szakasz, ellenőrizze a Cserélje le az eredeti lap nevét opciót.
   3. A Új munkalap neve szakaszban, kérjük, ellenőrizze a A munkalapok átnevezése adott cellával opciót, és adja meg azt a cellát, amelynek tartalmával átnevezni fogja a megfelelő lapot.
   4. Kattintson az Ok gombot.

És most minden ellenőrzött munkalap átnevezésre kerül az egyes lapok megadott cellája alapján. Lásd a képernyőképet:

1. Kattints Kutools Plus > Munkalap > Munkalapok átnevezése.
   
2. A megnyitón Több munkalap átnevezése párbeszédpanelen állítsa be a következőképpen:
   1. A munkalapok listában válassza ki az átnevezni kívánt munkalapokat.
   2. A Opciók átnevezése szakasz, ellenőrizze a Cserélje le az eredeti lap nevét opciót.
   3. A Új munkalap neve szakasz, ellenőrizze a Konkrét tartományból opciót, és kattintson a  gombot a második megnyitásához Több munkalap átnevezése párbeszédpanel (lásd a jobb oldali képernyőképet). Ezután válassza ki az értékük alapján átnevezni kívánt cellák listáját, és kattintson a gombra OK gombot.
   4. Kattintson az Ok gombot az átnevezés alkalmazásához.

Ezután látni fogja, hogy az összes ellenőrzött munkalap neve a megadott listában lévő cellaértékekre van cserélve. Lásd az alábbi képernyőképet:

Bemutató: névlapok az cellák értékei alapján (listából) az Excel-ben

Kapcsolódó cikkek: