Domača » kako » Paketne priponke PDF v Outlooku

    Paketne priponke PDF v Outlooku

    Ta članek je napisal Sean Tsai, strokovnjak za skladiščenje podatkov in dober prijatelj How-To Geek

    Ste že kdaj želeli natisniti vsako prilogo, ki jo prejmete v e-poštnem nabiralniku za Outlook? Recimo, da ste se naročili na brezplačen e-poštni naslov za faks in želite, da se samodejno natisnejo kot starinski faks..

    Tukaj je hiter način, da se to doseže, če ste zadovoljni z malo VB (makro) programiranja.

    Tukaj je prikazano pravilo v Outlooku in premikanje dohodnih e-poštnih sporočil v ločeno podmapo. Z uporabo kode VB ustvarimo makro, s katerim lahko zaženete tiskalno opravilo za vsako e-pošto v tej podmapi, tako da vam ni treba odpreti e-pošte in natisniti prilog enega po enega.

    Korak 1

    Ustvarite podmapo »Batch Prints« v razdelku »Mailbox - YourName« v Outlooku.

    2. korak

    Ustvarite pravilo (iz menija Orodja / Pravila in opozorila) v Outlooku, ki izgleda tako:

    V polje “[email protected]” pošljite e-poštni naslov vašega dobavitelja faksa. V vrstico z zadevo postavite trajno besedilo, ki ga vsakokrat pošlje pošiljatelj faksa (ne vstavljajte besedila, ki bo redno spremenjeno). 3rd Polje »Batch Prints« je podmapo, ki ste jo pravkar ustvarili v prvem koraku.

    3. korak

    Ustvarite makro VB. Najprej odprite urejevalnik VB tako, da odprete Orodja / Makro / Visual Basic Editor. Videti morate urejevalnik VB tako:

    4. korak

    V levem oknu Project desno kliknite na element Project1 in vstavite modul Module1:

    Korak 5

    Ko je modul1 izdelan, kopirajte spodnjo kodo v okno na desni strani, kot je prikazano v bullet # 3.

    Javni podtiski privzetkov () Dim Prejeto kot MAPIFolder Dim element kot poštni element Dim Atmt kot priloga Dim FileName kot niz Dim i kot Integer Nastavi Inbox = GetNamespace ("MAPI"). GetDefaultFolder (olFolderInbox). ) Za vsako postavko v mapi Prejeto.Teme za vsako vstopno točko v postavki.Attachments 'vse priloge se najprej shranijo v mapo Temp C: Temp. Ustvarite to mapo. FileName = "C: Ime & Atmt.FileName Atmt.SaveAsFile FileName" ustrezno spremenite mapo programa, če Acrobat Reader ni nameščen na pogonu C: Shell "" C: Programske datoteke Adobe Reader 8.0 Čitalnik acrord32.exe / h / p "" "+ Ime datoteke +" "" ", vbHide Next Item.Delete" odstranite to vrstico, če ne želite, da se e-poštno sporočilo samodejno izbriše. 

    Upoštevajte, da boste morda morali spremeniti vrstico kode, ki kliče Acrobat, da se ujema s potjo v sistemu.

    6. korak

    Zdaj je namestitev končana. Vsa e-poštna sporočila vašega prodajalca faksov bodo prestavljena v “Batch Prints”, ko bodo prišli. Upoštevajte, da pričakujemo, da so vse priloge v formatu PDF, zato Acrobat acrord32.exe uporabljamo za tiskanje vseh prilog.

    Uporaba makra

    Zdaj, ko želite natisniti vse priloge, preprosto pojdite na makro in zaženite makro PrintAttachments in vse priloge bodo natisnjene zaporedno. E-pošta bo izbrisana in premaknjena v koš za smeti, ko bo natisnjena.

    Opomba: natisnejo se na privzeti tiskalnik, zato morate preveriti, ali je nastavljen in izbran veljaven gonilnik tiskalnika.

    Upam, da je to koristno!