Hvordan deaktiveres eller deaktiveres ingen advarsler om emner i Outlook?
Når du bruger Outlook 2010 og 2013, og hvis du sender e-mail-beskeder uden emner, vises der et meddelelsesfelt uden emne hver gang for at minde om det. Hvis du virkelig ikke vil udfylde emnet, er advarslen om intet emne et stort problem for dig. For at hjælpe Outlook-brugere med at slippe af med advarslen om intet emne, giver vi en færdighed i følgende tutorial.
Sluk eller deaktiver ingen emneadvarsler i Outlook
- Automatiser e-mail med Auto CC / BCC, Automatisk videresendelse ved regler; sende Auto svar (Ikke til stede) uden at kræve en udvekslingsserver...
- Få påmindelser som BCC Advarsel når du svarer til alle, mens du er på BCC-listen, og Påmind, når du mangler vedhæftede filer for glemte vedhæftede filer...
- Forbedre e-mail-effektiviteten med Svar (alle) med vedhæftede filer, Tilføj automatisk hilsen eller dato og tid til signatur eller emne, Besvar flere e-mails...
- Strømline e-mail med Genkald e-mails, Vedhæftningsværktøjer (Komprimer alle, Gem alt automatisk...), Fjern duplikaterog Hurtig rapport...
Sluk eller deaktiver ingen emneadvarsler i Outlook
I Outlook 2007 er der ingen advarsel, hvis du sender en e-mail-besked uden emne. Denne funktion er aktiveret i Outlook 2010 og 2013. Men der er ingen funktion for dig at slå fra eller fra denne advarsel om ingen emner. I denne vejledning viser vi dig VBA-kode for at opnå dette.
1. Tryk venligst andre + F11 taster for at åbne Microsoft Visual Basic for Applications-dialogboksen.
2. Udvid Project1 > Microsoft Outlook-objekter ved at dobbeltklikke på dem. Dobbeltklik derefter på Denne OutlookSession at åbne VbaProject.OTM dialog boks.
3. Kopier og indsæt nedenstående VBA-kode i dialogboksen.
VBA: Sluk eller deaktiver ingen motivadvarsler
Option Explicit
Private WithEvents oInspectors As Outlook.Inspectors
Private Sub Application_Startup()
Set oInspectors = Outlook.Inspectors
End Sub
Private Sub oInspectors_NewInspector(ByVal Inspector As Inspector)
Dim oItem As Object
On Error GoTo ExitProc
Set oItem = Inspector.CurrentItem
Debug.Print oItem.Sent
If oItem.Sent = False Then
If oItem.Subject = "" Then oItem.Subject = " "
End If
ExitProc:
Set oItem = Nothing
Set Inspector = Nothing
End Sub
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
On Error Resume Next
Item.Subject = Trim(Item.Subject)
End Sub
Private Sub Application_Quit()
Set oInspectors = Nothing
End Sub
4. klik Gem for at gemme VBA-koden.
5. Genstart Outlook-applikationen.
Derefter kan VBA-koden fungere. Når du sender en besked uden et emne, vises advarselsboksen Intet emne ikke mere.
Bemærk: Sørg for, at Aktivér alle makroer afkrydsningsfelt er markeret (Kontroller det ved at klikke på File (Felt) > Indstillinger > Trust Center > Trust Center-indstillinger, og i Trust Center dialog, vælg Makroindstillinger > Aktivér alle makroer), se skærmbilleder:
Bedste kontorproduktivitetsværktøjer
Kutools til Outlook - Over 100 kraftfulde funktioner til at superlade din Outlook
🤖 AI Mail Assistant: Øjeblikkelige pro-e-mails med AI-magi – et klik for geniale svar, perfekt tone, flersproget beherskelse. Forvandl e-mailing ubesværet! ...
📧 Email Automation: Ikke til stede (tilgængelig til POP og IMAP) / Planlæg Send e-mails / Auto CC/BCC efter regler ved afsendelse af e-mail / Automatisk videresendelse (avancerede regler) / Tilføj automatisk hilsen / Opdel automatisk e-mails med flere modtagere i individuelle meddelelser ...
📨 Email Management: Genkald nemt e-mails / Bloker svindel-e-mails af emner og andre / Slet duplikerede e-mails / Avanceret søgning / Konsolider mapper ...
📁 Vedhæftede filer Pro: Batch Gem / Batch adskilles / Batch komprimere / Automatisk gem / Automatisk afmontering / Automatisk komprimering ...
🌟 Interface Magic: 😊 Flere smukke og seje emojis / Boost din Outlook-produktivitet med fanebaserede visninger / Minimer Outlook i stedet for at lukke ...
👍 Wonders med et enkelt klik: Besvar alle med indgående vedhæftede filer / Anti-phishing e-mails / 🕘Vis afsenderens tidszone ...
👩🏼🤝👩🏻 Kontakter og kalender: Batch Tilføj kontakter fra udvalgte e-mails / Opdel en kontaktgruppe til individuelle grupper / Fjern fødselsdagspåmindelser ...
Over 100 Features Afvent din udforskning! Klik her for at finde mere.