07. april 2003 - 14:50Der er
12 kommentarer og 1 løsning
Indsæt aktivt arknavn i celle
Jeg søger en formel, som kan læse navnet på det aktuelle ark, og så indsætte det i en celle som tekst.
Jeg har en mappe med 150 ark, hvor hvert arknavn er identisk med et afdelingsnummer.
Ved start på ny budgetperiode, justerer jeg et ark til, som jeg så kopierer til de øvrige ark. Men korrekt afdelingsnavn må jeg i øjeblikket indsætte ved at gå ind på hver enkelt ark, og så indskrive i celle A2.
Hvis celle A2 i stedet var en formel som læste navnet på det aktive ark, og så indsatte denne værdi i A2 vil problemet være løst.
Function ArkNavnICelle(iMinusTegn As Integer) 'Returnerer ArkNavn til Celle - fjerner 0 første tegn Application.Volatile ArkNavnICelle = UCase(Right(ActiveSheet.Name, Len(ActiveSheet.Name) - iMinusTegn)) End Function
Chewie > umiddelbart virker din metode, men den har indbygget en fejl. Den virker på det aktive ark. Så hvis man refererer til cellen på et andet ark vil man få dette arks navn
Utroligt som interessen daler så snart, man har føet løst sit eget problem. Jeg husker, at der engang, for meget længe siden efterhånden, var noget, der hed moral og etik. Dengang behøvede vi heller ikke så mange love og regler for de mindste detaljer, ak ja.
-> Snowball, Beklager hvis jeg har stødt nogen, det var ikke min intention. Jeg har oprettet spørgsmålet igen, og accepteret bak's løsning. Håber alt er klart nu.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
