Preskoči na glavno vsebino

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

Avtor: Xiaoyang Zadnja sprememba: 2018-04-10

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:


Najboljša pisarniška orodja za produktivnost

Izjemne novice: Zažene se Kutools for Outlook Brezplačna različica!

Izkusite popolnoma nove Kutools za Outlook BREZPLAČNA različica s 70+ neverjetnimi funkcijami, vaša za uporabo ZA VEDNO! Kliknite za prenos zdaj!

🤖 Kutools AI : Takojšnja profesionalna e-poštna sporočila z umetno inteligenco – z enim klikom do genialnih odgovorov, popoln ton, večjezično znanje. Preoblikujte pošiljanje e-pošte brez napora! ...

📧 Avtomatizacija e-pošte: Samodejni odgovor (na voljo za POP in IMAP)  /  Načrtujte pošiljanje e-pošte  /  Samodejna CC/BCC po pravilih pri pošiljanju e-pošte  /  Samodejno naprej (napredna pravila)   /  Samodejno dodaj pozdrav   /  E-poštna sporočila več prejemnikov samodejno razdeli na posamezna sporočila ...

📨 Email upravljanje: Odpoklic e-pošte  /  Blokiraj prevarantska e-poštna sporočila glede na teme in druge  /  Izbriši podvojena e-poštna sporočila  /  napredno iskanje  /  Združite mape ...

📁 Priloge ProShrani paket  /  Batch Detach  /  Paketno stiskanje  /  Samodejno shranite   /  Samodejno loči  /  Samodejno stiskanje ...

🌟 Vmesnik Magic: 😊Več lepih in kul emojijev   /  Opomni vas, ko pridejo pomembna e-poštna sporočila  /  Minimizirajte Outlook, namesto da bi ga zaprli ...

???? Čudeži z enim klikom: Odgovori vsem z dohodnimi prilogami  /   E-poštna sporočila proti lažnemu predstavljanju  /  🕘Pokaži pošiljateljev časovni pas ...

👩🏼‍🤝‍👩🏻 Stiki in koledar: Paketno dodajanje stikov iz izbranih e-poštnih sporočil  /  Razdelite skupino stikov na posamezne skupine  /  Odstranite opomnike za rojstni dan ...

Takoj odklenite Kutools za Outlook z enim klikom—trajno brezplačno. ne čakaj, prenesite zdaj in povečajte svojo učinkovitost!

 

 

 

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations