Ne poznajem tako dobro
Word-ove objekte pa ne mogu da tvrdim, ali mi se čini da za štampanje ne postoji "ugrađena" mogućnost presretanja (kao što je to slučaj za
Open/Close recimo). Svejedno, naći će se neko pa ćeš saznati da li postoji i jednostavniji način od ovog kojim bih se ja poslužio.
VBA ekvivalent za štampanje je naredba
PrintOut() tako da bih ja kreirao makro koji će, kada ga pokrenem, da štampa aktivni dokument. Makro bi trebalo smestiti u
Normal template tako da uvek bude raspoloživ.
Evo ti lista koraka, možda izgleda komplikovano ali je vrlo prosto:
1) Otvori
Word
2) Pritisni ALT+F11 (otvara VBA editor)
3) Sa liste projekata lociraj
Normal i otvori mu pripadajuće elemente (pritisneš mišem na '+' dok se ne otvori i poslednji). Sad desnim klikom na
Normal i izaberi
Insert / Module. Daj ovom modulu neko logično ime umesto bezličnog
Module1, recimo
MojiAlati.
4) Sa dva klika na modul
MojiAlati otvori prozor za kod.
5) Ovde unesi makro za štampu, recimo da se zove ovako:
Code:
Sub MojeStampanje()
ActiveDocument.PrintOut
End Sub
6) Sad se vrati u
Word i kreiraj svoj taster za štampanje: desni klik na paletu sa alatima i
Customize...
7) Desnim klikom na postojeći taster za štampanje pa izeberi
Copy Button Image.
8) Pređi na dijalog
Customize koji ti stoji otvoren, trebalo bi da je to baš na kartici
Commands. Sa liste
Categories: obeleži
Macros a u prozoru
Commands: ćeš naći svoj makro za štampanje.
9) Prevuci ga pored postojeće ikonice za štampanje.
10) Desnim klikom na taj novi taster pa izaberi
Paste Button Image.
11) Desnim klikom na taj novi taster pa izaberi
Default Style.
12) Desnim klikom na taj novi taster pa izaberi
Name: pa u polje upiši kraće ime, npr "&Moje Stampanje".
Sad imaš dupliran taster koji je po svemu isti sa ugrađenim sa bitnom razlikom što ovom koji si dodao možeš da dodaješ funkcije koje tebi trebaju.
Ne moram baš sve sam da ti rešim, poigraj se dalje sam. Naredba za snimanje aktivnog dokumenta je
SaveAs() pa prouči malo HELP. Naredba kojom ćeš dobiti sistemsko vreme je
Time; ipak, nećeš moći prosto da prilepiš na novo ime vreme koje ti ona vrati jer ovaj string sadrži zabranjen simbol ':' koji nije dozvoljen u imenu fajla.
Kada ovo rešiš, obrati pažnju i na to da ćeš u slučaju naknadnog pozivanja makroa za štampu imati izmenjeno ime sa prisutnim vremenom štampanja. Dakle, nećeš moći prosto da lepiš svaki put vreme uz ime fajla nego moraš da napraviš inteligentiji metod.
Have you found helpful examples, solutions or ideas-in-work, please consider the
following:
• Citation of *actual page* you are going to using is welcome.
• Have you saw "Value Added" examples you are going to incorporate to your
profitable blog, daily job or any money making venture: How about online donation?
↗Ana & Vlade Divac Foundation
Hvala!