Inhoudsopgave
Dit artikel illustreert 2 handige manieren om de bladnaam te verkrijgen in Excel. De bladnaam is een naamseigenschap van het werkbladobject in Excel.
Download Praktijk Werkboek
Download dit oefenwerkboek om te oefenen terwijl u dit artikel leest.
Bladnaam.xlsm2 Methoden om bladnaam in Excel te krijgen
We kunnen formules van veelgebruikte functies of eenvoudige VBA-code gebruiken om de bladnaam te krijgen die is opgeslagen in een cel of wordt getoond in de MsgBox.
1. Formule gebruiken om de bladnaam in Excel te krijgen
Aangezien Excel geen ingebouwde functie om de bladnaam te krijgen, moeten we een functie schrijven in een combinatie met de MID, CELL en FIND-functies Laten we eens kijken:
=MID(CEL("bestandsnaam",A1),FIND("]",CEL("bestandsnaam",A1))+1,31)
Zet de formule in een van de cellen van het werkblad waarvan we de naam willen krijgen. In dit voorbeeld hebben we ons werkblad de naam " Formule " en zet dan de formule in cel C5 .
Hoe de formule werkt
- De CELL functie in de formule geeft de volledig pad, naam van de werkmap en de naam van het huidige blad Hier is de formule:
=CELL("bestandsnaam",A1)
- Het in de vorige stap gevonden resultaat heeft bijgevoegd de naam van het werkboek in [ ] haakjes e. [excel sheet name.xlsm] We moeten uitzoeken wat de positie van de rechterbeugel De huidige werkbladnaam begint onmiddellijk na de rechterbeugel Dus, de VIND functie vindt de positie van het rechter haakje met de volgende formule en dan moeten we toevoegen 1 om de positie van de eerste reeks van de werkbladnaam .
=FIND("]",CELL("filename",A1))+1
- Tot slot MID-functie neemt drie argumenten-
1e argument: =CELL("bestandsnaam",A1) gebruikt in de eerste stap.
2e argument: =FIND("]",CELL("filename",A1))+1 gebruikt in de tweede stap.
3e argument: 31 dat is de maximale lengte van een werkbladnaam in Excel
Lees meer: Hoe bladnaam zoeken in Excel-werkmap (2 methoden)
Alternatieve formule
Deze formule kan als alternatief worden gebruikt die de RECHTS functie in plaats van de MID-functie.
=RIGHT(CEL("bestandsnaam",A1),LEN(CEL("bestandsnaam",A1))-FIND("]",CEL("bestandsnaam",A1))
2. VBA-code voor het ophalen en weergeven van de Excel-bladnaam
2.1 Verkrijg de naam van het actieve blad in Excel met behulp van VBA-code
Gebruik onderstaande eenvoudige code om de actieve bladnaam te krijgen.
Sub SheetName() Range("A1") = ActiveSheet.Name End Sub
2.2 Bladnaam opzoeken met behulp van indexnummer
Met de volgende code kunnen we de werkbladnaam op basis van hun indexnummer Als er meerdere werkbladen in een werkmap, is deze methode handig om de werkbladnaam gemakkelijk en snel te achterhalen.
Bijvoorbeeld, we zijn in de tweede werkblad genaamd vba1. Met de volgende code kunnen we de eerste blad naam die Formule is.
Sub Sheet Name() Range("C5") = Sheets(1).Name End Sub
Met de volgende code kunnen we de laatste blad naam van een werkmap. In dit voorbeeld is de laatste bladnaam VBA 2.
Sub SheetName() Range("C6") = Sheets(Sheets.Count).Name End Sub
Lees meer: Bladnaam zoeken met VBA in Excel (3 voorbeelden)
Opmerkingen
We kunnen ook de MsgBox-functie om het resultaat van de VBA-code te tonen in een MsgBox als het niet nodig is om het in een cel op te slaan of te gebruiken.
Conclusie
Nu weten we hoe we de bladnaam in Excel kunnen krijgen. Hopelijk stimuleert het u om deze functionaliteit met meer vertrouwen te gebruiken. Heeft u vragen of suggesties, vergeet ze dan niet in het commentaarveld hieronder te zetten.