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

  • Delila_1

    Topikgazda

    válasz #2955 üzenetére

    [link]

    Itt megtalálod a personal.xls létrehozásának a menetét az 527-es hozzászólásnál.
    Eszközök->Tools
    Margókkal a fekvő lap:

    Sub Fekvo_lap()
    With ActiveSheet.PageSetup
    .LeftMargin = Application.InchesToPoints(0.196850393700787)
    .RightMargin = Application.InchesToPoints(0.196850393700787)
    .TopMargin = Application.InchesToPoints(0.196850393700787)
    .BottomMargin = Application.InchesToPoints(0.196850393700787)
    .HeaderMargin = Application.InchesToPoints(0.511811023622047)
    .FooterMargin = Application.InchesToPoints(0.393700787401575)
    .CenterHorizontally = True
    .Orientation = xlLandscape
    End With
    End Sub

    Ami makrót a personalba teszel, az minden füzetnél elérhető lesz.
    A fejléc és lábléc magasságát a HeaderMarginnál és a FooterMarginnál állíthatod.

    [ Szerkesztve ]

    Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

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