Hoe maak je de naam van het bladtabblad gelijk aan de celwaarde in Excel?
In sommige gevallen moet u de naam van een werkblad wijzigen op basis van een opgegeven celwaarde. In dit artikel laten we u methoden zien om de naam van het bladtabblad gelijk te maken aan de celwaarde in Excel.
Maak de bladtabnaam gelijk aan de celwaarde met VBA-code
Maak de bladtabnaam gelijk aan de celwaarde met Kutools voor Excel
Maak de bladtabnaam gelijk aan de celwaarde met VBA-code
Met de volgende VBA-code kunt u de naam van het bladtabblad automatisch gelijk maken aan de celwaarde.
1. Klik met de rechtermuisknop op de bladtab waarvan u de bladnaam gelijk wilt maken aan de celwaarde, en klik vervolgens op Bekijk code vanuit het rechtsklikmenu. Zie screenshot:
2. Kopieer en plak onderstaande code in het codevenster en druk op anders + Q toetsen tegelijkertijd om het venster Microsoft Visual Basic for Applications te sluiten.
VBA-code: maak de bladtab gelijk aan de celwaarde
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20230130
On Error Resume Next
If Not Intersect(Target, Range("A1")) Is Nothing Then
ActiveSheet.Name = ActiveSheet.Range("A1")
ElseIf Not Intersect(Target.Dependents, Range("A1")) Then
ActiveSheet.Name = ActiveSheet.Range("A1")
End If
End Sub
Note: In de code is A1 de cel die de waarde bevat die u als bladnaam moet gebruiken. U kunt het naar behoefte wijzigen.
Vanaf nu, wanneer de waarde in cel A1 is gewijzigd, wordt de naam van de bladtab ook op dezelfde manier gewijzigd.
Maak de bladtabnaam gelijk aan de celwaarde met Kutools voor Excel
In deze sectie stellen we u de Hernoem meerdere werkbladen nut van Kutools for Excel. Met dit hulpprogramma kunt u eenvoudig werkbladen hernoemen met de waarde van een bepaalde cel in Excel.
Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.
1. klikken Koetools Plus > Werkblad > Hernoem meerdere werkbladen. Zie screenshot:
2. In de Hernoem meerdere werkbladen dialoogvenster, moet u het volgende doen.
U kunt zien dat de geselecteerde werkbladen onmiddellijk worden hernoemd met de opgegeven bereikwaarde, zoals hieronder wordt getoond.
Opmerkingen:
Als u een gratis proefperiode (30 dagen) van dit hulpprogramma wilt, klik om het te downloaden, en ga vervolgens de bewerking toepassen volgens de bovenstaande stappen.
Maak de bladtabnaam gelijk aan de celwaarde met Kutools voor Excel
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar effici毛ntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!