Tiskanje strani od izpolnjenem pogoju

[tjazma]

Pozdravljeni,

Brskal sem po forumu, pa nisem našel rešitve na moj problem. Zanima me ali je možno in kako z makrojem dopovedati tiskalniku naj natisne drugo stran dokumenta le v primeru ko je izpolnjen nek pogoj (na primer da je vrednost v celici A68 različna <> "" ).

Hvala vsem za odgovor .

[admin]

Koda: Izberi vse

Sub Tiskaj()
  If (ActiveSheet.Range("A68") <> "") Then
    ActiveWindow.SelectedSheets.PrintOut From:=2, To:=2, Copies:=1
  End If
End Sub

[tjazma]

Pozdravljeni,

In to, je to !
Kar se da naučiti iz tega foruma ne piše v nobeni knjigi.
Hvala še enkrat.