Ich bins schon wieder. Nachdem mein Problem von gestern mit untenstehendem Code einwandfrei gelöst wurde, stehe ich nun vor dem Problem, dass dieser Code nur auf Tabelle2 meiner Arbeitsmappe angewendet werden soll!
Kann mir vielleicht jemand weiterhelfen?
Gruss Catherine
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.RightFooter = "&""Arial,Fett""&13 DA Inspektorat&""Arial,Standard""&11" & Chr(10) & "" & Chr(10) & "&11 " & [p1]
End Sub