Reference i sidefod

Nej, men du kan bruge en makro, til at indsætte indholdet fra cellen til din sidefod. Hvis du er interesseret, kan jeg godt kigge på det.

Makro\'en skal køres hver gang celleindholdet ændres, men det kan også laves autoamtisk.

det med en makro er også det jeg selv havde tænkt på. Jeg håbede bare, at der var en mere \"elegant\" måde.

Sub Footer()
    With ActiveSheet.PageSetup
        .LeftFooter = \"\"
        .CenterFooter = \"\"
        .RightFooter = \"\"
    End With
End Sub

I stedet for \"\" sætter du den footer du vil benytte = det ark og celle som du vil bruge f.eks. Worksheets(\"Ark1\").Range(\"A1\")

Ja det er jeg med på, men jeg vil helst holde arkene fri for knapper og brugerne fri for at skulle opdatere.
Det kan jeg hvis jeg gemmer makroen i et skjult ark og den så opdaterer automatisk ved åbning. Ved du (eller andre) hvordan man kan få excel til at køre en makro ved åbning af filen?

I det ark, hvor du vil bruge koden, der smidder du en kode lignende denne her i arkets kode modul, og så vil Footeren ændres hver gang din celle (her D12) ændre sig.

God fornøjelse

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rFooter As Range
    Set rFooter = Range(\"D12\")
   
    If Not Intersect(Target, rFooter) Is Nothing Then
        With ActiveSheet.PageSetup
            .LeftFooter = rFooter
            .CenterFooter = \"\"
            .RightFooter = \"\"
        End With
    End If

Set rFooter = Nothing
End Sub

Makro ved åbning af filen laves i kodemodulet ThisWorkbook og hedder
Private Sub Workbook_Open()

End Sub

Ok, det lyder godt. Du får pointsene. Tak for hjælpen.
Jeg kan nok ikke bruge det endnu, fordi vi bruger office95. Men jeg har testet det på min vens office2000, og det virker, så må jeg bare vente til vi får office2000....medmindre du da har en løsning til office95 også?

Det burde også virke på din office95

Ok, det prøver jeg når jeg kan komme til det. Tak i hvert fald.