Microsoft Office Word
uređuje Dragan Grbić

Automatsko snimanje

Nivo:
NIVO 3 - Prilozi na ovom nivou su namenjeni naprednim korisnicima, onima koji se već dobro snalaze u programima i onima koji već imaju iskustva u naprednim tehnikama. Ovom nivou pripadaju preporuke i trikovi koje bi trebalo da savlada svako ko teži dugotrajnom i efikasnom radu u Office programima.

Excel ima sistem za automatsko snimanje, ali ga Word nema. Kako obezbediti sličnu funkciju i kakve su moguće posledice?

Početnici su skloni da pogrešno razumeju značenje sistema AutoRecovery u Wordu. Kako aktuelni Office XP najzad donosi ovu alatku u još dva programa (Excel i PowerPoint), mislim da treba napomenuti važnu pojedinost: AutoRecovery nije isto što i automatsko snimanje dokumenta. Prvi pojam se odnosi na čuvanje stanja dokumenta u posebnom obliku, ako da ga program može oporaviti nakon dolaska u neregularno stanje, kako bi se gubitak u tekućem radu sveo na najmanju meru; automatsko snimanje je fizičko zapisivanje dokumenta u datoteku, isto kao i da ste pritisnuli CTRL+S, samo što to program čini umesto vas u zadatim intervalima vremena.

Ovo otvara pitanje o načinu automatskog snimanja dokumenta, što može biti jedna od krajnjih bezbednosnih mera u svakodnevnom radu. Excel ima odgovarajući add-in potprogram AutoSave, ali ga Word nema. Međutim, primenom VBA metoda programiranja događaja, ovaj nedostatak se može rešiti. Ovde vidite tri kratka makroa koji čine jedinstvenu celinu: prvi inicira proceduru događaja pri otvaranju, koji je zapisan u drugom makrou; na zadati događaj (isteklo vreme), aktivira se makro Snimi, koji snima dokument.

Sub AutoOpen()
' inicijalizacija pri otvaranju dokumenta

AktSnimanje

End Sub


Sub AktSnimanje()
' procedura događaja

Application.OnTime _
When:=Now + TimeValue("00:10:00"), Name:="Snimi"

End Sub


Sub Snimi()
' snimanje

ActiveDocument.Save

'i ponovno iniciranje događaja
AktSnimanje

End Sub

Ali, potrebna je i reč upozorenja: razmislite da li je ukupna dobit od ove automatizacije veća od rizika koji može nastati neželjenim snimanjem dokumenta koji ste samo privremeno izmenili iz nekog razloga. Ovo se sa jedne strane može prevazići tako što ćete umesto trećeg makroa upotrebiti drugu varijaciju makroa Snimi koja postavlja kontrolno pitanje:

' Varijacija trećeg makroa Snimi()
' kontrolno pitanje
Sub Snimi()

Pitanje = MsgBox("Snimiti dokument?", vbYesNo)
If Pitanje = vbYes Then ActiveDocument.Save
AktSnimanje

End Sub

Ali opet - ako brzo kucate, možete slučajno dati pogrešan odgovor. Zato vam savetujem dve stvari: prvo, naviknite se da sami često pritisnete CTRL+S, pazeći koliko često to radite. A ako vam se čini da je opisana tehnika prikladna za neke posebne namene, nemojte je generalizovati na nivou celog Worda; tačnije, nemojte snimati makroe u Normal.Dot, što je glavni šablon programa. Umesto toga, napravite poseban šablon i pobrinite se da makro funkcioniše samo u njemu.