Hogyan lehet mindig emlékeztetőket vinni az alkalmazások elé az Outlook alkalmazásban?

Alapértelmezés szerint az Outlook emlékeztetői ablak megnyílik a többi megnyíló ablak mögött. Ezért elfoglaltsága során hiányozhat néhány fontos emlékeztető az Outlookban. Az Outlookban az emlékeztetők hiányának elkerülése érdekében a legjobb módszer az, ha mindig az összes megnyíló ablak elé viszi az emlékeztetőket. A cikkben szereplő módszer segít elérni.

Mindig hozzon emlékeztetőket az alkalmazások elé VBA kóddal

Mindig hozzon emlékeztetőket az alkalmazások elé VBA kóddal

Kérjük, alkalmazza a következő VBA kódot, hogy mindig emlékeztetőket vigyen az Outlook alkalmazásai elé.

1. Az Outlook programban nyomja meg a gombot más + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson duplán a gombra ThisOutlookSession a bal oldali ablaktáblán a kódablak megnyitásához. Ezután másolja az alábbi kódot az ablakba.

VBA kód: Mindig hozzon emlékeztetőket a fornt-hoz

Private Sub Application_Reminder(ByVal Item As Object)
'Updated by ExtendOffice 20180814
Dim xAppointment As AppointmentItem
If Item.Class = olAppointment Then
    Set xAppointment = Item
    MsgBox xAppointment.Subject, 4096 + vbInformation + vbOKOnly, "Outlook reminders"
End If
End Sub

3. megnyomni a más + Q gombok a Microsoft Visual Basic for Applications ablak.

Mostantól, amikor egy emlékeztető elindul az Outlook programban, egy Outlook emlékeztetők párbeszédpanel jelenik meg az aktuálisan használt ablak előtt. Kattintson a gombra OK gomb azonnali váltáshoz az Outlook emlékeztetők ablakába. Lásd a képernyőképet: