2 jednoduché spôsoby, ako rýchlo previesť e-mail na pozvánku na schôdzku v programe Outlook

Ak chcete previesť e-mail z Outlooku na pozvánku na stretnutie, môžete si prečítať tento príspevok. Tu sa s vami podelíme o 2 rýchle postupy.

Keď dostanete e-mail, ktorý obsahuje veľa informácií o schôdzke, ktoré sa majú naplánovať, možno budete chcieť rýchlo vytvoriť schôdzku priamo z tohto e-mailu. V tejto situácii môžete podľa potreby použiť ktorúkoľvek z nasledujúcich 2 metód.

Metóda 1: Konverzia bez pôvodných príloh e-mailov

1. Na začiatok vyberte požadovaný e-mail.
2. Potom kliknite na tlačidlo „Stretnutie“ v skupine „Odpovedať“ na karte „Domov“.
3. Okamžite sa zobrazí pozvánka na schôdzku, ako je znázornené na nasledujúcom obrázku.

Poznámky:

• To znamená, že ak má pôvodný e-mail prílohy, prílohy sa nebudú kopírovať na schôdzu.
• A ako vidíte, telo schôdzky obsahuje pôvodnú hlavičku e-mailu, napríklad pôvodného odosielateľa alebo príjemcov atď.

Ak si prajete, aby sa na schôdzu dali skopírovať pôvodné prílohy e-mailov a vylúčiť pôvodná hlavička e-mailu, môžete použiť metódu 2.

Metóda 2: Konverzia s pôvodnými prílohami e-mailov

1. Pre začiatok stlačte klávesy „Alt + F11“ na spustenie editora VBA v programe Outlook.
2. Potom skopírujte nasledujúci kód do projektu alebo modulu.

Sub ConvertEmailtoMeeting()
    Dim objMail As Outlook.MailItem
    Dim objMeeting As Outlook.AppointmentItem
    Dim objAttachment As Outlook.Attachment
    Dim strFilePath As String
 
    Select Case Outlook.Application.ActiveWindow.Class
           Case olInspector
                Set objMail = ActiveInspector.currentItem
           Case olExplorer
                Set objMail = ActiveExplorer.Selection.Item(1)
    End Select
 
    Set objMeeting = Outlook.Application.CreateItem(olAppointmentItem)
 
    'Copy Attachments
    If objMail.Attachments.Count > 0 Then
       For Each objAttachment In objMail.Attachments
           strFilePath = CStr(Environ("USERPROFILE")) & "\AppData\Local\Temp\" & objAttachment.FileName
           objAttachment.SaveAsFile (strFilePath)
 
           objMeeting.Attachments.Add strFilePath
 
           Kill strFilePath
       Next
    End If
 
    With objMeeting
        .Subject = objMail.Subject
        'Exclude Original Email Header
        .Body = objMail.Body
        .MeetingStatus = olMeeting
        .Display
    End With
End Sub

3. Potom ukončite editor a pridajte toto makro na panel nástrojov Rýchly prístup (QAT).
4. Nakoniec vyberte alebo otvorte e-mail a kliknite na tlačidlo makra v QAT.
5. Naraz sa zobrazí pozvánka na schôdzku, ako je to znázornené na snímke obrazovky nižšie. Originálne e-mailové prílohy sú zahrnuté a v tele nie je pôvodná hlavička e-mailu.

Riešenie problémov s programom Outlook

Hoci je Outlook plnohodnotným e-mailovým klientom, stále sa nedokáže zbaviť smrteľnej chyby, a to zraniteľnosti. Inými slovami, dá sa ľahko poškodiť. To tiež znamená, že vaše údaje v Outlooku sú neustále v ohrození. Za týchto okolností je najdôležitejším a najdôležitejším krokom pravidelné zálohovanie údajov v Outlooku. Okrem toho je rozumné zaobstarať si výkonný... Oprava programu Outlook nástroj, ako napr DataNumen Outlook Repair.

Úvod autora:

Shirley Zhang je expertkou na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane korupcia sql a výhľadové softvérové ​​produkty na opravu. Pre viac informácií navštívte www.datanumen. S