Želite li često odgovoriti svima uključujući i sebe kao primatelja? Bit će neuredno ako uvijek ručno dodajete vlastitu adresu e-pošte. Ovaj članak će vas naučiti kako to učiniti automatskim.
Možda imate nekoliko računa e-pošte konfiguriranih u Outlooku. Stoga, možda radi pogodnosti za buduću provjeru, kada odgovarate na e-poštu svim primateljima, možda ćete poželjeti uključiti i svoju drugu adresu e-pošte kao primatelja. Pod pretpostavkom da često imate ovaj zahtjev, bit će zamorno ako uvijek ručno dodajete vlastiti račun e-pošte. Kao odgovor na ovaj problem, ovdje ćemo vam predstaviti jedno zaobilazno rješenje kao i brzu metodu putem Outlook VBA.
Zaobilazno rješenje: Stvorite Outlook pravilo
- Na samom početku pokrenite Outlook i kliknite gumb "Pravilo" u grupi "Premjesti" pod karticom "Početna" u Pošti. Zatim s padajućeg popisa odaberite "Upravljanje pravilima i upozorenjima".
- Zatim u skočnom prozoru pritisnite gumb "Novo pravilo".
- Zatim odaberite "Primijeni pravilo na poruke koje šaljem" i pritisnite "Dalje".
- Nakon toga trebate odabrati "s određenim riječima u temi", pritisnuti poveznicu "određene riječi", a zatim dodati "RE".

- Nakon što ga dodate i kliknete "Dalje", trebali biste odrediti radnju. Odaberite "CC poruku osobama ili javnoj grupi", kliknite vezu "osobe ili javna grupa" i upišite svoju adresu e-pošte u polje "Prima".
- Na kraju možete kliknuti "Dalje" i završiti postavljanje pravila kao i obično.
Međutim, ovo zaobilazno rješenje ne dodaje automatski vašu vlastitu adresu e-pošte kao jednog primatelja u e-poruci koja odgovara. Stvorit će još jednu novu e-poštu i dodati vas u polje "CC" te je poslati. Također, ne može identificirati broj primatelja i prepoznati radi li se o e-poruci s odgovorom na sve. Da biste riješili slabosti ovog rješenja, evo stvarne metode putem programa Outlook VBA.
Koristite VBA za automatsko uključivanje sebe kada odgovarate svima
- Za početak, pokrenite Outlook i pritisnite tipke "Alt + F11".
- Zatim u skočnom prozoru "Visual Basic" otvorite projekt "ThisOutlookSession" i kopirajte i zalijepite sljedeće VBA kodove u njega.
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim Recip As Recipient
Dim MyAddr As String
'Replace with your own email address
MyAddr = "youremailaddress@datanumen.com"
If InStr(Item.Subject, "RE") > 0 Then
If Item.Recipients.Count > 1 Then
If MsgBox("Reply All Including Yourself?", vbYesNo + vbQuestion) = vbYes Then
Set Recip = Item.Recipients.Add(MyAddr)
'To CC, replace "olTo" with "olCC"
'To BCC, replace "olTo" with "olBCC"
Recip.Type = olTo
Recip.Resolve
End If
End If
End If
End Sub
- Nakon toga, trebali biste potpisati ovaj kod i promijeniti postavke makronaredbi kako biste dopustili samo digitalno potpisane makronaredbe.
- Konačno, možete pokušati. Kada odgovorite svim primateljima i kliknete gumb "Pošalji", dobit ćete upit programa Outlook, kao na sljedećoj snimci zaslona. Ako pritisnete "Da", Outlook će automatski dodati vašu vlastitu adresu e-pošte.
Pobrinite se za svoje Outlook PST datoteke
Zbog ranjivosti Outlook PST datoteke, trebali biste paziti na sve moguće rizike koji je okružuju. Na primjer, trebali biste držati datoteku male veličine jer je ta prevelika PST datoteka mnogo sklonija oštećenju. Također, trebali biste nabaviti zvijezdu alat za popravak oštećene PST datoteke, koji će vam priskočiti u pomoć kada doživite neočekivano oštećenje PST datoteke.
Uvod za autora:
Shirley Zhang stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući popraviti pokvaren SQL Server db i softverske proizvode za popravak Outlooka. Za više informacija posjetite www.datanumen.com


