title image


Smiley Re: automatische Anpassung Fußzeile xls
Hallo Steffen,



da hat sich ein Schreibfehler eingeschlichen, es heißt Footer und nicht Footerer



Also:



Private Sub Workbook_BeforePrint(Cancel As Boolean)

ActiveSheet.PageSetup.LeftFooter = _

Sheets("XYZ").Range("A1").Value

End Sub



Gruß Peter

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: