Přejít k hlavnímu obsahu

Jak vypnout nebo zakázat varování před žádným předmětem v aplikaci Outlook?

Pokud používáte Outlook 2010 a 2013, posíláte-li e-mailové zprávy bez předmětů, pokaždé se zobrazí okno s výzvou bez předmětu, které vám to připomene. Pokud opravdu nechcete předmět vyplnit, varování pro žádný předmět bude pro vás velkým problémem. Abychom pomohli uživatelům Outlooku zbavit se varování před žádným předmětem, poskytujeme dovednosti v následujícím výukovém programu.

V Outlooku vypněte nebo zakažte varování před žádným předmětem

Karta Office – Povolte úpravy a procházení na kartách v Microsoft Office, díky čemuž bude práce hračkou
Kutools pro Outlook – Vylepšete Outlook se 100+ pokročilými funkcemi pro vynikající efektivitu
Vylepšete svůj Outlook 2021–2010 nebo Outlook 365 pomocí těchto pokročilých funkcí. Užijte si komplexní 60denní bezplatnou zkušební verzi a vylepšete svůj e-mailový zážitek!

šipka modrá pravá bublinaV Outlooku vypněte nebo zakažte varování před žádným předmětem

V aplikaci Outlook 2007 neexistuje žádné upozornění, pokud odesíláte e-mailovou zprávu bez předmětu. Tato funkce je povolena v Outlooku 2010 a 2013. Neexistuje však žádná funkce, která by umožňovala vypnout nebo deaktivovat toto varování bez předmětu. V tomto tutoriálu vám ukážeme kód VBA, jak toho dosáhnout.

1. Stiskněte Další + F11 klávesy pro otevření dialogového okna Microsoft Visual Basic pro aplikace.

2. Rozbalte Project1 > Objekty Microsoft Outlook dvojitým kliknutím na ně. A potom dvakrát klikněte na ThisOutlookSession k otevření VbaProject.OTM dialogové okno.

3. Zkopírujte a vložte níže uvedený kód VBA do dialogového okna.

VBA: vypnout nebo deaktivovat varování bez předmětu

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. cvaknutí Uložit tlačítko pro uložení kódu VBA.

5. Restartujte aplikaci Outlook.

Pak může kód VBA fungovat. Když odešlete zprávu bez předmětu, varovné pole bez předmětu se již nebude zobrazovat.

Poznámka: Ujistěte se, že Povolit všechna makra políčko je zaškrtnuto (Zkontrolujte jej kliknutím Soubor > možnosti > Centrum zabezpečení > Nastavení centra důvěryhodnosti, a v Centrum zabezpečení dialog, zvolte Nastavení makra > Povolit všechna makra), viz screenshoty:


Nejlepší nástroje pro produktivitu v kanceláři

Kutools pro aplikaci Outlook - Více než 100 výkonných funkcí, které doplní váš Outlook

???? Automatizace e-mailu: Mimo kancelář (k dispozici pro POP a IMAP)  /  Naplánujte odesílání e-mailů  /  Automatická kopie/skrytá kopie podle pravidel při odesílání e-mailu  /  Automatické přeposílání (pokročilá pravidla)   /  Automatické přidání pozdravu   /  Automaticky rozdělte e-maily pro více příjemců na jednotlivé zprávy ...

📨 Email management: Snadné vyvolání e-mailů  /  Blokujte podvodné e-maily podle předmětů a dalších  /  Odstranit duplicitní e-maily  /  pokročilé vyhledávání  /  Konsolidovat složky ...

📁 Přílohy ProDávkové uložení  /  Dávkové odpojení  /  Dávková komprese  /  Automaticky uložit   /  Automatické odpojení  /  Automatické komprimování ...

???? Rozhraní Magic: 😊 Více pěkných a skvělých emotikonů   /  Zvyšte produktivitu své aplikace Outlook pomocí zobrazení s kartami  /  Minimalizujte aplikaci Outlook namísto zavírání ...

???? Zázraky na jedno kliknutí: Odpovědět všem s příchozími přílohami  /   E-maily proti phishingu  /  🕘Zobrazit časové pásmo odesílatele ...

👩🏼‍🤝‍👩🏻 Kontakty a kalendář: Dávkové přidání kontaktů z vybraných e-mailů  /  Rozdělit skupinu kontaktů na jednotlivé skupiny  /  Odeberte připomenutí narozenin ...

Přes 100 Vlastnosti Očekávejte svůj průzkum! Kliknutím sem zobrazíte další informace.

Více       Stažení zdarma      Nákup
 

 

Comments (4)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Forgot to mention I do have a Microsoft 365 subscription as well.
Rated 5 out of 5
This comment was minimized by the moderator on the site
Hi, I use outlook.live.com to check my hotmail. How can I fix it so that I don't encounter this error on there? Thanks! RamyJo
Rated 5 out of 5
This comment was minimized by the moderator on the site
Oh my GOSH! THANK YOU!
This comment was minimized by the moderator on the site
THANK YOU SO MUCH
this was driving me crazy. If I forward something to myself, if I send to a family member, if I just decide it doesn't warrant a subject, I don't want to have to add one! and I hate, hate hate when my email sits there unsent for an hour because I didn't notice it got hung up by the subject line Nazi.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations