Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

[Excel] Štampa radnog lista pomoću makroa

[es] :: Office :: Excel :: [Excel] Štampa radnog lista pomoću makroa

[ Pregleda: 2146 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

ercha85
Ivan Erlenvajn

Član broj: 74235
Poruke: 44
*.041net.co.yu.



Profil

icon [Excel] Štampa radnog lista pomoću makroa29.01.2007. u 18:07 - pre 179 meseci
Interesuje me da li mozda ima negde na net-u makro koji bi mi posle unosa recimo 1 u neku celiju isprintao taj Sheet.
Pomoc!!!
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2199
212.200.27.*

Sajt: www.gowi.rs


+96 Profil

icon Re: [Excel] Štampa radnog lista pomoću makroa30.01.2007. u 08:25 - pre 179 meseci
Ne znam čemu služi (zar nije jednostavnije Ctrl+P?) ali mozeš da uradis tako što presretneš događaj on change radnog lista i ukoliko je izmenjena ćelija A1 i u nju upisano 1 štampaš taj list. Kod bi bio sledeći:
Code:

Private Sub Worksheet_Change(ByVal Target As Range)
' Stampa tekuci list kad se u celiju A1 unese 1
'
' P.Jovanovic za elitesecurity.org

If Not (Application.Intersect(Target, Range("A1")) Is Nothing) Then

    If Target.Value = 1 Then
       ' Stampaj tekuci lis
       ActiveSheet.PrintOut
       ' Isprazni celiju
      'Target.Value = ""
    End If
End If

End Sub

Ovaj kod treba dodati u okviru radnog lista koji treba da se štampa (npr Sheet1). Ukoliko želiš da ti se isprazni ćelija A1 nakon štampe iskluči komentar ispred Target...
Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

[es] :: Office :: Excel :: [Excel] Štampa radnog lista pomoću makroa

[ Pregleda: 2146 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.