Seitenzählung in Fußzeile
03.02.2009 13:30:14
Horst
ich hab mal wieder ein Problem, bei dem ich um eure mithilfe bitte.
Ich hab folgende Fußzeile in gebrauch:
ACTIVESHEET.PageSetup.RightFooter = "&""swis721 Cn BT,Standard""&11" & Chr(13) & _
ACTIVESHEET.Cells(10, 18).Value & Chr(13) & _
"erstellt: " & ACTIVESHEET.Cells(11, 18).Value & Chr(13) & _
ACTIVESHEET.Cells(12, 18).Value & Chr(13) & _
"Seite &P von " & ACTIVESHEET.Cells(36, 7).Value
Nun möchte ich gerne das bei der ersten Seitenangabe ich von &P eine Variable subtrahiere.
Ich weiß in der Form &P-Zahl funktioniert das, aber mit einer Variablen will das einfach nicht klappen.
Ich hab mir das in etwa so vorgestellt:
'subtrahend um bei gen neu zu Zählen für den Rest
Dim y As Integer
y = ACTIVESHEET.Cells(36, 7)
ACTIVESHEET.PageSetup.RightFooter = "&""swis721 Cn BT,Standard""&11" & Chr(13) & _
ACTIVESHEET.Cells(10, 18).Value & Chr(13) & _
"erstellt: " & ACTIVESHEET.Cells(11, 18).Value & Chr(13) & _
ACTIVESHEET.Cells(12, 18).Value & Chr(13) & _
"Seite &P-y von " & ACTIVESHEET.Cells(36, 7).Value
Leider funktioniert das nicht. auch wenn ich das ganze ohne "" schreibe funzt es nicht.
Hoffentlich hat jemand von euch eine Idee.
Vielen Dank schonmal im Vorraus,
euer Horst