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

• #2954 Delila_1 veterán Pá #2953

  Új Válasz 2008-01-10 13:46:05 #2954

  Ú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

  

  Delila_1

  veterán

  válasz Pá #2953 üzenetére

  Még azt tehetnéd meg, hogy a personal.xls-be beviszed az alábbi makrót, és kiteszel hozzá egy ikont az eszköztárra. A fekvő lap beállításán kívül a táblázatodat vízszintesen a margók között középre is helyezi. Ha az nem kell, az alsó makrót használd.

  Sub Fekvo_lap()
  With ActiveSheet.PageSetup
  .CenterHorizontally = True
  .Orientation = xlLandscape
  End With
  End Sub

  Sub Fekvo_lap()
  ActiveSheet.PageSetup.Orientation = xlLandscape
  End Sub

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