Outlook antaa käyttäjille mahdollisuuden merkitä sähköpostit mukautetulla seurantamuistutuksella ja eräpäivällä. Mutta sinun on valittava ja otettava se käyttöön manuaalisesti. Tämä artikkeli opettaa sinulle, kuinka saavuttaa se automaattisesti VBA: n kautta.
Outlook tarjoaa meille "Flag" -ominaisuuden, jonka avulla voimme seurata kriittisiä sähköposteja paljon helpommin. Sen lisäksi, että se antaa meille mahdollisuuden tehdä sähköpostia, voimme myös valita haluamasi lippukuvakkeen, määrittää tietyn eräpäivän ja jopa määrittää mukautetun muistutuksen sähköpostiin. Ilman epäilyksiä, se on erittäin kätevä.
Mutta monilla käyttäjillä on edelleen toinen halu. He toivovat, että Outlook pystyy automaattisesti määrittämään suhteellisen kiinteän mukautetun eräpäivän ja muistutusajan ilmoitetuille sähköposteille, kuten 3 päivää tämän päivän jälkeen, viikon kuluttua tämän päivän jne. Siksi sinun on palattava muille keinoille, esimerkiksi VBA: lle. Tässä opetamme sinulle, kuinka Outlook VBA: ta käytetään tämän vaatimuksen toteuttamiseen. Lue lisää saadaksesi sen yksityiskohtaisesti.
Aseta muistutus ja eräpäivä automaattisesti, kun ilmoitat Outlook-sähköpostin
- Käynnistä Outlook-ohjelma heti alusta.
- Sitten voit painaa Alt + F11-pikanäppäimiä päästäksesi VBA-editoriin.
- Seuraavaksi seuraavassa "Microsoft Visual Basic for Applications" -ikkunassa sinun on kaksoisnapsautettava "ThisOutlookSession" -projektia vasemmalla puolella.
- Kopioi ja liitä sitten alla olevat VBA-koodit siihen.
Public WithEvents objInboxItems As Outlook.Items
Private Sub Application_Startup()
Set objInboxItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub objInboxItems_ItemChange(ByVal Item As Object)
Dim objMail As Outlook.MailItem
If TypeOf Item Is MailItem Then
Set objMail = Item
If (objMail.IsMarkedAsTask = True) And (objMail.FlagStatus <> olFlagComplete) Then
'You can change the following lines as per your actual needs
With objMail
.FlagRequest = "Type the custom follow-up notes here"
.MarkAsTask olMarkNextWeek
'Set a custom due date
.TaskDueDate = Now + 7
.ReminderSet = True
'Set a custom reminder time
.ReminderTime = Now + 6.5
.Save
End With
End If
End If
End Sub
- Sen jälkeen sinun tulee allekirjoittaa tämä koodi normaalisti.
- Poistu myöhemmin VBA-editorista ja muuta Outlook-makroasetuksia ja ota käyttöön vain digitaalisesti allekirjoitetut makrot.
- Lopuksi sinun on käynnistettävä Outlook uudelleen aktivoidaksesi uuden makron. Sen jälkeen voit kokeilla.
- Napsauta lippukuvaketta sähköpostikohdan lopussa.
- Lippu muuttuu kerralla automaattisesti seuraavan viikon lippukuvakkeeksi.
- Ja sen eräpäivä ja muistutusaika asetetaan vastaamaan koodiesi esiasetusta.
Älä paniikkia, jos kohtaat Outlook-kaatumisen
Kun Outlook kaatuu odottamatta, useimmat ihmiset pelkäävät paniikkia, koska he pelkäävät Outlook-tietojensa vahingoittuvan. Mutta todellisuudessa, jos olet tehnyt riittävät varotoimet, et koskaan paniikkiudu. Tärkein toimenpide on varmuuskopioida PST-tiedostot säännöllisesti. Lisäksi voit myös turvautua ensisijaiseen työkaluun palauttaaksesi tiedot vahingoittunut Outlook tiedot, kuten DataNumen Outlook Repair.
Tekijän esittely:
Shirley Zhang on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien sql-korjaus ja Outlookin korjausohjelmistotuotteet. Lisätietoja osoitteessa www.datanumen.com


