|
Evo ja otvaram ovu temu, jer mislim da ovo, ipak nekom može da zatreba.
Moj prvi mali savet:
Ukoliko želite da u word-u napravite opciju koja će trenutno aktivan dokument da presnimi na disketu uradite sledeće:
1) Pritisnite kombinaciju tastera Alt+F8 i kada se na ekranu pojavi prozor za izradu Macro-a u polju Name upisite SaveToA, a zatim kliknite na Create.
2) Zatim ukucajte sledeći kod:
On Error GoTo kraj
naziv = InputBox("Ime dokumenta", "Snimanje na disketu")
ActiveDocument.SaveAs FileName:="A:\" + naziv, _
fileformat:=wdFormatDocument, addtorecentfiles:=False
kraj:
End Sub
3) Pošto ste iskucali kod izaberite stavku View/Toolbars/Customize..... Nakon toga na ekranu će se pojaviti prozor Customize. Sada kliknite na karticu Commands i u odeljku categories pronađite Macro, a onda u susednom odeljku Commands nađite Normal.new macros.SaveToA i prevucite ga u file meni kao podmeni menija send to. (to sve radite dok je prozor customize otvoren).
4) Pošto ste smestili macro u meni (prozor customize je i dalje otvoren) kliknite desnim tasterom miša na njega i u meniju koji se pojavi pronađite polje name (u njemu piše Normal.newmacros.SaveToA) i ukucajte floppy. Sada zatvorite prozor customize i macro je spreman.
5) Da bi ste ga testirali ubacite disketu u jedinicu aktivirajte neki dokument i izaberite stavku file/send to/floppy. Na ekranu bi trebalo da se pojavi prozor u kome će biti zatraženo da unesete ime dokumenta-uradite to i kliknite OK. Nakon nekoliko sekundi vaš dokument bi trebalo da bude prebačen na floppy
|
