Új hozzászólás Aktív témák

• #31113 bteebi veterán Joltee #31110

  Új Válasz 2016-03-25 09:31:28 #31113

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  bteebi

  veterán

  válasz Joltee #31110 üzenetére

  Ha minden lapra ugyanazt az élőfejet/élőlábat szeretnéd, akkor az makróval könnyen (és nagyon gyorsan) megcsinálható:

  Sub HeaderFooterEdit()
  Dim i As Integer
  For i = 1 To Worksheets.Count
  With Sheets(i).PageSetup
  .LeftHeader = "Bal oldali élőfej"
  .CenterHeader = "Középső élőfej"
  .RightHeader = "Jobb oldali élőfej"
  .LeftFooter = "Bal oldali élőláb"
  .CenterFooter = "Középső élőláb"
  .RightFooter = "Jobb oldali élőláb"
  End With
  Next
  End Sub

Új hozzászólás Aktív témák