VBA navngivning af fane ved deaktivering

Det burde virke hvis "Ark3" er et defineret navn der refererer til en enkelt celle. Men ellers så giver Range("Ark3") ikke mening. Hvad prøver du at gøre? Hvor skal den læse navnet fra?

Jeg har en celle med navn "Ark3", hvor navnet "Forside" står i.

Jeg kan ikke umiddelbart se hvorfor det ikke skulle virke. Du er lige nødt til at give lidt flere informationer.

- Får du en fejlmeddelelse (hvilken)? Eller bliver navnet bare ikke sat?
- Arket der skal omdøbes hedder vel "Ark3" i VBA-editoren?
- Er det ved Deactivate af ark3 selv at navnet skal ændres - eller hvilket ark ligger koden i?
- Hvilket ark ligger "Ark3"-cellen i?

Hvis der på Ark1 er en celle der er bødt "Ark3" sætter denne navnet på Ark3
når andet Ark vælges, hvis koden ligger på Ark1:

Private Sub Worksheet_Deactivate()
    Ark3.Name = Range("Ark3")
End Sub

Hvis koden ligger på Ark2 eller andet? så prøv:

Private Sub Worksheet_Deactivate()
    Ark3.Name = Ark1.Range("Ark3")
End Sub

Ja, store-morten har formentlig identificeret årsagen, som jeg prøvede at spørge mig frem til :o)

Tak store-morten og undskyld det udeblivne svar til dig anlu.

Det virker helt efter hensigten, men undre mig over at navngivningen af en celle ikke gælder over hele VBA når den ellers virker i hele Excelmappen.

Lægger du et svar store-morten?

Helt ok for mig - jeg kunne også bare have været mere direkte i stedet for at skulle være 100% sikker på at jeg havde ret i min antagelse :o)

Men til din kommentar om at navngivningen af cellen ikke gælder over hele VBA, så hænger det nok snarere sammen med at Range-objektet referer til et sheet. Man kan referere til navnet via Name-objektet uden at vide hvilket sheet det ligger på, fx:

    Dim nm As Name
    Set nm = ActiveWorkbook.Names("Ark3")
    Ark3.Name = nm.RefersToRange.Value

Kan vi ikke dele point for fælles indsats ;-)

Pyt med det - giv bare pointene til store-morten; jeg har ikke det store pointforbrug selv :)

Tak for hjælpen og forklaringen begge!