navngive fanebladet efter celle A1

Prøv med

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
ActiveSheet.Name = Cells(1, 1).Value
End If
End Sub

Den ændrer navnet på fanebladet hver gang der skrives i A1

eller denne....

Sub makeWsnames()
Dim ws As Worksheet
For Each ws In Worksheets
        ws.Select
        If ws.Range("A1") <> "" Then ws.Name = Range("A1")
Next ws
End Sub

Den skal ligge i et almindeligt kodemodul.
Den opretter navnet på fanebladet hvis A1 indeholder "noget"
DU skriver "simpel" - men for ikke at fejle bør koden endvidere checke at den fx. ikke forsøger at oprette samme navn 2 gange.

mvh Kurt

glemte lige at skrive at jeg er HELT grøn i excel, så måske i kunne specificere hvordan jeg precis sætter det ind?
sorry

Ok ;-)

Når filen er åben....
Tryk Alt + F11
Her åbner VisualBasic vinduet...
Vælg: "Insert Module"

Kopier koden ovenfor - fx: (Ctrl + C)

Sub makeWsnames()
Dim ws As Worksheet
For Each ws In Worksheets
        ws.Select
        If ws.Range("A1") <> "" Then ws.Name = Range("A1")
Next ws
End Sub

Indsæt denne kode i den nye modul (Module1)

Luk VisualBasicvinduet igen...

Tryk Alt+F8

Vælg "MakeWsnames" og tryk "Afspil".


mvh Kurt

Alternativt kan du højreklikke på fanebladet, vælge Vis Koder og indsætte makroen der. Den vil så kun virke på dette faneblad

Hmm har nu prøvet med de forslag i er kommet med, jeg får ingen fejl, men der er heller ingen ændring i fanenavnet.

Har i et forslag til hvad det kan skyldes?

Muligvis...

Makroer skal være aktiverede i dit excel.

Det er lidt forskelligt hvordan man gør det alt efter Excelversion...

I Excel 2003
skal du vælge Funktioner > Indstillinger > og Fanebladet "sikkerhed".
Her skal du klikke på knappen "makrosikkerhed" og på fanebladet "sikkerhedsniveau" markere "lav" eller "mellem".

I Excel 2007
skal du Klikke på Makrosikkerhed i gruppen Kode
under fanen Udvikler.

Klik på "Aktiver alle markoer...." under Makroindstillinger i kategorien Makroindstillinger.

Tip!  Hvis fanen Udvikler ikke vises, skal du klikke på Microsoft Office-knappen , klikke på Excel-indstillinger og derefter klikke på Vis fanen Udvikler på båndet under Vigtigste indstillinger for arbejde med Excel i kategorien Populær.

mvh

Beklager at jeg er lidt sent på den...

Men kan da sige at det lykkedes :)
Kurt og jens, smid et svar, så får i point

God fornøjelse ;-)

Hvad så hvis denne makro skal fungere for alle faner, men ikke det første? Jeg har et samleark, som det første ark, og derefter en masse faner, som jeg gerne vil have bliver navngivet ud fra en celleværdi.
Men ikke samlearket.

Mvh
Mia