Slik setter du automatisk Outlook online eller frakoblet basert på arbeidstiden din

Noen brukere ønsker å få Outlook til å automatisk bytte mellom online og offline status basert på arbeidstiden deres. Så i denne artikkelen vil vi dele en rask metode med deg.

Det er faktisk veldig enkelt å sette Outlook online eller offline. For å gjøre Outlook til offline-status, kan du bare bytte til "Send/Motta"-fanen og trykke på "Jobb frakoblet"-knappen. Og for å gå tilbake til nettstatus, trykk ganske enkelt på denne knappen igjen. Noen brukere håper imidlertid at Outlook automatisk kan bytte til offline-status når det er utenfor arbeidstid og gå tilbake til online i arbeidstiden. Selv om Outlook ikke tilbyr en slik funksjon, kan du fortsatt bruke følgende VBA-kode for å oppnå den.

Automatisk innstilling av Outlook online eller frakoblet basert på arbeidstiden din

Automatisk innstilling av Outlook online eller frakoblet basert på arbeidstiden din

  1. Helt fra starten av, start Outlook-programmet ditt.
  2. Deretter, etter å ha fått tilgang til Outlook, bør du åpne Oppgaver-mappen.
  3. Deretter bør du opprette et daglig gjentakende oppgaveelement.
  • Klikk på "Ny oppgave"-knappen på båndet.
  • Skriv deretter inn "Offline" i oppgavens emnelinje.
  • Klikk deretter på "Recurrence"-knappen under "Oppgave"-fanen.
  • I popup-dialogboksen velger du "Daglig" gjentakelsesmønster, aktiver "Ingen sluttdato" og trykk "OK".Opprett et daglig gjentakende oppgaveelement
  • Deretter bør du aktivere en påminnelse klokken "5:00".Aktiver en påminnelse klokken «5:00»
  • Trykk til slutt på "Lagre og lukk"-knappen.
  1. Deretter må du opprette en annen daglig gjentakende oppgave kalt "Online" og aktivere en påminnelse klokken "8:00 AM", vist som bildet nedenfor:Lag en annen daglig gjentakende oppgave kalt "Online"
  2. Deretter trykker du på "Alt + F11" i hovedvinduet i Outlook.
  3. Deretter får du tilgang til Outlook VBA-editor, der du må finne og åpne "ThisOutlookSession" -prosjektet.
  4. Kopier deretter følgende VBA-kode inn i dette prosjektet.
Dim objNameSpace As Outlook.NameSpace

'Set Online/Offline Status on Outlook Startup
Private Sub Application_Startup()
    Set objNameSpace = Application.GetNamespace("MAPI")
 
    'If now is before 8:00 AM or after 5:00 PM on Outlook startup
    If Now() < DateSerial(Year(Now), Month(Now), Day(Now)) + #8:00:00 AM# Or Now() > DateSerial(Year(Now), Month(Now), Day(Now)) + #5:00:00 PM# Then
 
       'If Outlook is online
       If objNameSpace.Offline = False Then
          'set it offline
          ActiveExplorer().CommandBars.FindControl(, 5613).Execute
       End If
 
       'If now is between 8:00 AM and 5:00 PM
    Else
 
       'If Outlook is offline
       If objNameSpace.Offline = True Then
          'Set it online
          ActiveExplorer().CommandBars.FindControl(, 5613).Execute
       End If
    End If
End Sub

'Change Online/Offline Status at Specific Time
Private Sub Application_Reminder(ByVal Item As Object)
    Dim objOfflineTask As Outlook.TaskItem
    Dim objOnlineTask As Outlook.TaskItem
 
    Set objNameSpace = Application.GetNamespace("MAPI")
 
    If TypeOf Item Is TaskItem Then
       If Item.Subject = "Offline" Then
          Set objOfflineTask = Item
 
          'If Outlook is online when "Offline" task reminder alerts
          If objNameSpace.Offline = False Then
             'Set Outlook offline
             ActiveExplorer().CommandBars.FindControl(, 5613).Execute
          End If
 
          'Clear the reminder by marking task complete
          objOfflineTask.MarkComplete
 
       ElseIf Item.Subject = "Online" Then
          Set objOnlineTask = Item
 
          'If Outlook is offline when "Online" task reminder alerts
          If objNameSpace.Offline = True Then
             'Set Outlook online
             ActiveExplorer().CommandBars.FindControl(, 5613).Execute
          End If
 
          objOnlineTask.MarkComplete
 
       End If
    End If
End Sub

VBA-kode - Automatisk innstilling av Outlook online eller frakoblet basert på arbeidstiden din

  1. Til slutt kan du starte Outlook på nytt for å aktivere denne makroen.
  2. Fra nå av vil Outlook være online i arbeidstiden og automatisk bytte til offline-status utenom arbeidstiden.

Din siste utvei i tilfelle Outlook-krasj

Selv om Outlook kan skryte av flere funksjoner, kan Outlook fortsatt ikke holde unna feil og skader. Men ikke få panikk. Så lenge du tar tilstrekkelige forholdsregler, kan du fortsatt beskytte Outlook-dataene dine effektivt. For eksempel bør du sikkerhetskopiere PST-filene dine regelmessig, siden sikkerhetskopier vil gjøre det mulig for deg å komme tilbake korrupt PST data. Også holde et kraftig reparasjonsverktøy, som DataNumen Outlook Repair, er også et spørsmål om nødvendighet.

Forfatterintroduksjon:

Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert fikse mdf og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med

Kommentarer er stengt.