2 mënyra të thjeshta për të kthyer shpejt një email në një ftesë takimi në Outlook

Nëse dëshironi të konvertoni një email nga Outlook në një ftesë për takim, mund t'i referoheni këtij postimi. Këtu do të ndajmë me ju 2 qasje të shpejta.

Kur merrni një email që përmban shumë informacione rreth një takimi që do të planifikohet, mund të dëshironi të krijoni shpejt një takim direkt nga ky email. Në këtë situatë, ju mund të përdorni njërën nga 2 metodat e mëposhtme sipas nevojave tuaja.

Metoda 1: Konvertoni pa bashkëngjitjet origjinale të emailit

  1. Për të filluar, zgjidhni emailin që dëshironi.
  2. Pastaj, klikoni butonin "Takim" në grupin "Përgjigju" në skedën "Home".Klikoni në butonin "Takimi".
  3. Menjëherë do të shfaqet një ftesë për takim, siç tregohet në figurën e mëposhtme.Takimi me titullin origjinal të emailit

Shënime:

  • Në këtë mënyrë, nëse emaili origjinal ka bashkëngjitje, bashkëngjitjet nuk do të kopjohen në takim.
  • Dhe, siç mund ta shihni, trupi i takimit përmban kokën origjinale të emailit, të tillë si dërguesi ose marrësit origjinal etj.

Nëse dëshironi që bashkëngjitjet origjinale të emailit të mund të kopjohen në takim dhe titulli origjinal i emailit mund të përjashtohet, mund të përdorni metodën 2.

Metoda 2: Konvertoni me bashkëngjitjet origjinale të postës elektronike

  1. Për të filluar, shtypni "Alt + F11" për të aktivizuar redaktorin VBA të Outlook.
  2. Pastaj, kopjoni kodin e mëposhtëm në një projekt ose modul.
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

Kodi VBA - Konvertoni një email në një ftesë takimi

  1. Pas kësaj, dilni nga redaktori dhe shtoni këtë makro në shiritin e veglave të aksesit të shpejtë (QAT).
  2. Më në fund, zgjidhni ose hapni një email dhe klikoni butonin makro në QAT.
  3. Menjëherë, do të shfaqet një ftesë për takim, siç tregohet në pamjen e mëposhtme të ekranit. Shtojcat origjinale të emailit janë përfshirë dhe nuk ka kokën origjinale të emailit në trup.Takimi u konvertua nga emaili

Zgjidh problemet e Outlook

Edhe pse Outlook është një klient email-i me funksione të plota, ai prapë nuk mund të heqë qafe një të metë vdekjeprurëse që është e cenueshme. Me fjalë të tjera, mund të dëmtohet lehtë. Kjo gjithashtu do të thotë që të dhënat tuaja të Outlook janë gjithmonë në rrezik. Në këtë rrethanë, veprimi më i rëndësishëm dhe i domosdoshëm është të bëni kopje rezervë të rregullta të të dhënave për Outlook. Përveç kësaj, është e mençur të merrni një të fuqishëm. Rregullimi i Outlook mjet, si p.sh DataNumen Outlook Repair.

Hyrje e autorit:

Shirley Zhang është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë korrupsioni sql dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com

Komentet janë të mbyllura.