Download het voorbeeldwerkboek
Gebruik deze Excel-formule om de naam van het werkblad te krijgen
Werkbladnaam ophalen - Excel-formule
Gebruik de volgende formule om de werkbladnaam in één Excel-formule te berekenen: =mid(cell("bestandsnaam",a1),find("]",cell("bestandsnaam",a1))+1,999)
Merk op in de afbeelding hierboven dat deze formule de bladnamen GetWorksheetName en Sheet3 retourneert.
Deze code ziet er in eerste instantie misschien intimiderend uit, maar is minder verwarrend als je hem opsplitst in afzonderlijke formules:
Excel-functies - werkbladnaam
De CEL-functie:
De celfunctie retourneert informatie over een cel. Gebruik de criteria "bestandsnaam" om de bestandslocatie, naam en huidige blad te retourneren. =cell("bestandsnaam",a1)
Geeft terug: pad[werkboek.xlsx]blad : C:[werkboek.xlsm]Blad1 in het bovenstaande voorbeeld.
De FIND-functie:
De CELL-functie retourneert [workbook.xlsx]sheet , maar we willen alleen de bladnaam, dus we moeten deze uit het resultaat halen. Eerst moeten we echter de FIND-functie gebruiken om de locatie van de bladnaam uit het resultaat te identificeren. =vind("]",E5)
Geeft terug:De locatie van het teken "]". 18 in het bovenstaande voorbeeld.
De MID-functie
Vervolgens extraheren we de gewenste tekst met behulp van de MID-functie met het resultaat van de FIND-functie (+1) als start_num. =MID(E5,E6+1,999)
Geeft terug: De bladnaam: Blad1 in het bovenstaande voorbeeld.
Waarom heb ik 999 gekozen voor de num_characters-invoer in de MID-functie? 999 is een groot getal dat alle resterende tekens retourneert. U had in plaats daarvan een ander aanzienlijk groot aantal kunnen kiezen.
Bladnaam ophalen in VBA
Als u VBA wilt gebruiken in plaats van een Excel-formule, heeft u veel opties. Dit is slechts één voorbeeld:activesheet.range("a1").value = activesheet.name
Voer de huidige werkbladnaam in cel A1 in met VBA.
Keer terug naar formulevoorbeelden
