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 schôdzku, môžete si pozrieť túto sost. Tu s vami zdieľame 2 rýchle prístupy.

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 akotart, stlačte kombináciu klávesov „Alt + F11“ a spustite editor Outlook VBA.
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

Aj keď je Outlook plnohodnotným e-mailovým klientom, stále sa nemôže zbaviť smrtiacej chyby, ktorá je zraniteľná. Inými slovami, môže byť ľahko poškodený. Znamená to tiež, že vaše údaje z Outlooku sú vždy v nebezpečenstve. Za týchto okolností most rozhodujúcim a nevyhnutným krokom je pravidelné zálohovanie údajov pre aplikáciu Outlook. Okrem toho je rozumné zmocniť sa mocných 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