Hente tekst fra faneblad

Public Function arknavn()
arknavn = Application.Caller.Parent.Name
End Function

benyttes sådan
=arknavn()

Eller denne.

=HØJRE(CELLE("filnavn";Ark4!A1);LÆNGDE(CELLE("filnavn";Ark4!A1))-SØG("]";CELLE("filnavn";Ark4!A1)))

Jeg vil gerne give dig point for den første del - men dit andet svar er sort snak for mig og skriver jeg det i en celle, så kommer en dialogboks frem: Opdater værdier: Ark 4.

Hvad gør hele den lange linie. Der er både en ark4 indblandet sammen med længde, højre, celle, filnanv m.v.

Ark4 er arkets navn.

prøv at rette "Ark4" til det dit ark hedder.

Ellers brug blot det første forslag.

"Den lange linie" har jeg med held brugt hvor fanerne skal være ugenumre, så kan jeg kopiere arkene, og nøjes med at rette på fanebladet så en celle får det ønskede ugenummer.