Kan en celleværdi bestemmer navnet på et nyt ark, der oprettes via en makro

Så skal der jo være et fast udgangspunkt (ark) - alternativt - en userform, hvori der kan indtastes arknavn, vælges placering og udføres kontrol af, om navnet er anvendt - uanset hvilket ark, der er aktuelt.

- men ellers JA til dit spørgsmål

Der er (selvfølgelig) et åbningsark hvor knappen er og hvor jeg tænker, at brugeren skal skrive navnet. Har du mon en kode? :o)

Sub Nyt_ark()
    Dim Navn As String
    Navn = Range("A1")
    Sheets("sag").Copy After:=Sheets(3)
    ActiveSheet.Name = Navn
End Sub

Den melder problem i forhold til: ActiveSheet.Name = Navn
Resten virker - dvs. ark oprettes og navn sættes = tekst i A1

Så har jeg fundet en løsning, der virker:

Sub Nyt_ark()
    Dim Navn As String
    Navn = ActiveSheet.Range("A1").Value
    Sheets("master").Copy After:=Sheets(3)
    ActiveSheet.Name = Navn
End Sub

Man kan faktisk gøre det lidt kortere:

Sub Nyt_ark()
    Dim Navn As String
    Sheets("master").Copy After:=Sheets(3)
    ActiveSheet.Name = ActiveSheet.Range("A1").Value
End Sub

Jeg har dog oftest set koden uden "Activesheet.", så måske ligger problemet i mit regneark. Så hvis hr. kabbak lige "smider" et svar.

;-))