Tiskanje glave

Pomoč pri izdelavi makrov
Odgovori
BJ
Prispevkov: 170
Pridružen: Sr Okt 26, 2005 5:46 pm

Tiskanje glave

Odgovor Napisal/-a BJ »

En lep pozdrav!
Na listu imam ukazni gumb za tiskanje. Kakšno kodo bi moral dodati, da se glava izpiše samo na prvi strani, na naslednjih pa ne?
Hvala!
BJ
admin
Site Admin
Prispevkov: 3687
Pridružen: Sr Jul 20, 2005 10:06 pm

Odgovor Napisal/-a admin »

V katerem programu?
lp,
Matjaž Prtenjak
Administrator
BJ
Prispevkov: 170
Pridružen: Sr Okt 26, 2005 5:46 pm

Odgovor Napisal/-a BJ »

Pardon -Excel
admin
Site Admin
Prispevkov: 3687
Pridružen: Sr Jul 20, 2005 10:06 pm

Odgovor Napisal/-a admin »

Nekaj takšnega:

Koda: Izberi vse

Public Sub SamoNaPrviStrani()
    Dim sHeader As String

    With ActiveSheet
        sHeader = .PageSetup.LeftHeader
        .PrintOut From:=1, To:=1
        .PageSetup.LeftHeader = ""
        .PrintOut From:=2
        .PageSetup.LeftHeader = sHeader
    End With
End Sub
lp,
Matjaž Prtenjak
Administrator
BJ
Prispevkov: 170
Pridružen: Sr Okt 26, 2005 5:46 pm

Odgovor Napisal/-a BJ »

"Nekaj takšnega špiiiila"
Najlepša hvala
LP BJ
Odgovori