Note: The other languages of the website are Google-translated. Back to English

Kako nastaviti privzeti začetni datum kot danes pri ustvarjanju nove naloge v Outlooku?

Ko v Outlooku ustvarimo novo nalogo, se opravilo z »Datum začetka"Se prikaže z »Nobene”Privzeto, kot je prikazano na sliki spodaj. Včasih pa morate danes pogosto določiti njegov začetni datum, zato morate datum v polju »Datum začetka« vsakič izbrati ročno. Ali obstaja kakšen hiter način, da pri ustvarjanju novega opravila v Outlooku samodejno nastavite privzeti začetni datum kot danes?

Pri ustvarjanju novega opravila s kodo VBA v Outlooku nastavite privzeti začetni datum kot danes


Pri ustvarjanju novega opravila s kodo VBA v Outlooku nastavite privzeti začetni datum kot danes

Mogoče ni nobenega drugega dobrega načina za neposredno reševanje te naloge v Outlooku, tukaj bom predstavil kodo VBA za njeno rešitev. Naredite naslednje:

1. Zaženite Outlook in pridržite ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. v Microsoft Visual Basic za aplikacije okno, dvokliknite Ta OutlookSession Iz Projekt1 (VbaProject.OTM) , da odprete način, nato pa v prazen modul kopirajte in prilepite naslednjo kodo.

Koda VBA: Nastavite privzeti začetni datum kot danes:

Public WithEvents xInspectors As Outlook.Inspectors
Public WithEvents xTaskItem As Outlook.TaskItem
Private Sub Application_Startup()
   Set xInspectors = Outlook.Inspectors
End Sub
Private Sub xInspectors_NewInspector(ByVal Inspector As Inspector)
    If Not (TypeOf Inspector.CurrentItem Is TaskItem) Then Exit Sub
    Set xTaskItem = Inspector.CurrentItem
End Sub
Private Sub xTaskItem_Open(Cancel As Boolean)
If (Len(xTaskItem.Subject) = 0 And Len(xTaskItem.Body) = 0) And (xTaskItem.StartDate = #1/1/4501# And xTaskItem.DueDate = #1/1/4501#) Then
    xTaskItem.StartDate = Now
End If
End Sub

3. Po vstavitvi kode postavite kazalko na drugi odsek kode in pritisnite F5 tipko za zagon te kode, glej posnetek zaslona:

4. Od takrat, ko vsakič ustvarite novo nalogo, bo Outlook privzeto samodejno nastavil začetni in končni datum na trenutni datum, kot je prikazano na sliki spodaj:


Kutools za Outlook - prinaša 100 naprednih funkcij v Outlook in olajša delo!

  • Samodejno CC / BCC po pravilih pri pošiljanju e-pošte; Samodejno posredovanje naprej Več e-poštnih sporočil po meri; Samodejni odgovor brez strežnika za izmenjavo in več samodejnih funkcij ...
  • Opozorilo pred BCC - prikaži sporočilo, ko poskušate odgovoriti vsem če je vaš poštni naslov na seznamu BCC; Opomni, ko manjkajo priloge, in več opomnikov ...
  • Odgovori (vsi) z vsemi prilogami v e-poštnem pogovoru; Odgovori na veliko e-poštnih sporočil v nekaj sekundah; Samodejno dodaj pozdrav ko odgovor; Dodaj datum v zadevo ...
  • Orodja za priloge: Upravljanje vseh prilog v vseh e-poštnih sporočilih, Samodejno loči, Stisni vse, Preimenuj vse, Shrani vse ... Hitro poročilo, Štejte izbrano pošto...
  • Zmogljiva neželena e-poštna sporočila po meri; Odstranite podvojene pošte in stike... Omogočajo vam pametnejše, hitrejše in boljše delovanje v Outlooku.
strelec kutools outlook kutools zavihek 1180x121
shot kutools outlook kutools plus jeziček 1180x121
 
Komentarji (0)
Ocene še ni. Bodite prvi in ​​ocenite!
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije