Zomaar gepikt van Wim Hendriksen:
Onderstaand twee formules waarmee je de tabbladnaam in een cel kunt
laten verschijnen.
=DEEL(CEL("filename";$A$1);VIND.SPEC("]"; CEL("filename";$A$1))+1;999)
=RECHTS(CEL("bestandsnaam";$A$1);LENGTE(CEL("bestandsnaam";$A$1))-VIND.SPECᅵ("]";CEL("bestandsnaam";$A$1)))
Groeten
Wim Hendriksen
Cobbe
Het werkt perfect. Dank voor de tip.
Vriendelijke groeten.
"so-on" schreef:
heb zojuist geschreven dat het perfect werkt...
Dit is niet zo.
Als je een aantal bladzijden hebt gekopieerd en je plaatst deze functie in
een cel dan geraakt hij in de war.
heb ergens gelezen dat je de volgende functie in een module daaraan zou
moeten toevoegen.
Public Function TabNaam()
TabNaam = ActiveSheet.Name
End Function
Hoe doe je dit?
"so-on" schreef:
De volgende functie werkt blijkbaar wel... Indien je de naam van het tabblad
in cel $C$9 wenst in te voeren. En lengte van de naam tabblad =256
=DEEL(CEL("bestandsnaam";$C$9);VIND.SPEC("]";CEL("bestandsnaam";$C$9);1)+1;256)
"so-on" schreef: