Navn på Excel-sheets

I VBA til Excel 2003 har jeg en stump kode der ligger i et ark.
Man aktiverer koden ved at klikke på en knap på værktøjslinien.
Koden skal kigge i det ark der er aktivt i det øjeblik der klikkes på knappen og det virker fint, da det er det aktive ark. Men den skal også kigge i det ark der indeholder selve koden.

Spørgsmålet er hvordan jeg finder dette filnavn. Indtil videre har jeg hardcoded filnavnet, men det er ikke en holdbar løsning.

Nogen der kan hjælpe ?