Pri ponovnem pošiljanju ali posredovanju e-pošte morda ne boste želeli shraniti kopije v mapo Poslano. Ta članek vas bo naučil, kako konfigurirati Outlook, da vas pozove za shranjevanje kopije ali ne z Outlook VBA.
V resnici je za večino običajnih e-poštnih sporočil priporočljivo shraniti kopije v mapo Poslano. Vendar pa se v nekaterih primerih, na primer pri ponovnem pošiljanju, posredovanju e-pošte ali ko ta vsebuje zelo veliko prilogo, morda zdi shranjevanje kopije nepotrebno. V teh okoliščinah lahko upate, da vas bo Outlook pozval in vam omogočil sprejemanje odločitev.
Rešitev: Uporabite možnost »Ne shrani«.
Pravzaprav Outlook te funkcije nima. Vendar lahko uporabite rešitev. To je možnost »Ne shrani« v oknu s sporočilom. Do njega lahko dostopate tako, da preklopite na zavihek »Možnosti« in nato kliknete gumb »Shrani poslani predmet v«, kot je naslednji posnetek zaslona:
Za lažji dostop do te možnosti jo lahko dodate v orodno vrstico za hitri dostop. Z desno tipko miške kliknite in v pojavnem meniju izberite »Dodaj v orodno vrstico za hitri dostop«.
Če od zdaj naprej ne želite shraniti kopije, lahko preprosto označite potrditveno polje poleg možnosti »Ne shrani« v orodni vrstici za hitri dostop. Čeprav je ta način res priročen, se večina uporabnikov še vedno pritožuje, da pogosto pozabijo označiti potrditveno polje. Zato si še vedno želijo pojavnega okna Outlook, ki bi jih vprašalo, ali naj shranijo kopijo. Če želite to doseči, uporabite Outlook VBA. Prosimo, preberite dalje, da dobite podrobne kode in korake.
VBA: Vprašajte, ali želite shraniti kopijo ali ne, ko pošiljate e-pošto
- Najprej zaženite Outlook in se premaknite na zavihek »Razvijalec«.
- Nato kliknite gumb "Visual Basic", ki bo prikazal novo okno.
- V oknu »Visual Basic« dvokliknite »ThisOutlookSession«, da odprete okno projekta »ThisOutlookSession«.
- Nato kopirajte in prilepite naslednje kode vanj.
Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim strMsg As String
Dim nRes As Integer
strMsg = "Do you want to save a copy of this message?"
nRes = MsgBox(strMsg, vbYesNo + vbQuestion, "Confirm Saving Copy")
If nRes = vbNo Then
Item.DeleteAfterSubmit = True
End If
End Sub
- Po tem podpišite to kodo kot običajno in spremenite nastavitve makra, da omogočite samo digitalno podpisane makre.
- Sčasoma lahko poskusite. Ko kliknete gumb »Pošlji«, boste prejeli Outlookovo opozorilo, kot je naslednja slika. Če izberete gumb »Ne«, trenutno sporočilo ne bo shranjeno v mapo Poslano. Če pritisnete gumb »Da«, se to sporočilo shrani.
Obvladovanje pogostih težav z Outlookom
Tako kot druge aplikacije ima lahko tudi Outlook različne težave, kot so nenadna zrušitev, neodzivanje, občasna sporočila o napakah itd. Zato, če ste reden uporabnik Outlooka, raje nabavite Outlook orodje za popravilo datotekkot DataNumen Outlook Repair v tem, da bo prišel prav, ko ugotovite, da je vaša datoteka Outlook poškodovana iz neznanih razlogov.
Uvod avtorja:
Shirley Zhang je strokovnjakinja za obnovitev podatkov v DataNumen, Inc., ki je vodilna na svetu na področju tehnologij za obnovitev podatkov, vključno z popravilo SQL Server poškodba baze podatkov mdf in obeti za popravilo programskih izdelkov. Za več informacij obiščite www.datanumen.com