Indsætning af stivej i sidefod

&[Sti]

Desværre kan jeg ikke få det til at virke. Jeg vælger Vis - Sidehoved og sidefod - Tilpas sidefod og skriver i venstre sektion &[Sti]. I regnearket vises det herefter i sidefoden som Sti]

Prøv evt med denne makro:

Sub HovedSidefod()
'
' Indsætter samme hoved og sidefod på alle ark.
' Incl. den fulde sti

Dim ws As Worksheet
    Application.ScreenUpdating = False
    For Each ws In ActiveWorkbook.Worksheets
        Application.StatusBar = "Skifter sidehoved/sidefod i " & ws.Name
        With ws.PageSetup
            .LeftHeader = "&6firmanavn"
            .CenterHeader = "&6Side &P af &N"
            .RightHeader = "&6Udskrevet: &D &T"
            .LeftFooter = "&6Sti: " & L & ActiveWorkbook.Path
            .RightFooter = "&6Filnavn: &F"
        End With
    Next ws
    Set ws = Nothing
    Application.ScreenUpdating = True
    Application.StatusBar = False
End Sub

Bemærk, at den ændrer alle elementer i hoved- og sidefod. Hvis der er nogle af dem, du ikke ønsker, sætter du blot en apostrof først i den pågældene linie. Så bliver den ikke udført.

Hej x-lars. Jeg har brug for en meget enkel måde i lighed med at sætte sidenr. og lign. på, da det skal være noget den enkelte bruger nemt kan håndtere. Derfor er en makro ikke en løsning jeg kan bruge. Men tak for forslaget.

Hvis du bruger xl97 eller xl2000 kan du ikke indsætte filnavn og sti uden en makro.
hvis du bruger xlXP eller xl2003 er der ingen problemer.

Et alternativ kunne være nederst / øverst på siden i en celle at skrive
=CELLE("Filnavn")
Denne formel giver sti og navn

Jeg bruger xl2000. Tak til Bak for den alternative løsning. Send et svar så får du point.

velbekomme :-)