Microsoft Excel

Herbers Excel/VBA-Archiv

Seitenzahl in Fußtext schreiben | Herbers Excel-Forum


Betrifft: Seitenzahl in Fußtext schreiben von: Hans
Geschrieben am: 26.07.2012 08:36:33

Hallo,

ich möchte in den rechten Footer den Inhalt der Zelle P3 schreiben, dann ein Leerzeichen und dann die Seitenzahl.

Leider habe ich einen Fehler bei der Seitenzahl-Einfügung.

With ActiveSheet
.PageSetup.LeftHeader = "&""Arial,Bold""&14" & ActiveSheet.Range("P1").Value
.PageSetup.LeftFooter = .Range("P2").Value
.PageSetup.RightFooter = .Range("P3") "&"" ""&P).Value
End With

Wie müsste das richtig lauten?

Gruß
Hans

  

Betrifft: AW: Seitenzahl in Fußtext schreiben von: UweD
Geschrieben am: 26.07.2012 09:39:46

Hallo


so :

    With ActiveSheet
       .PageSetup.RightFooter = .Range("P3").Value & " &P"
    End With

Gruß UweD


  

Betrifft: AW: Seitenzahl in Fußtext schreiben von: Hans
Geschrieben am: 26.07.2012 09:52:36

danke sehr


Beiträge aus den Excel-Beispielen zum Thema "Seitenzahl in Fußtext schreiben"