Outlook-da elektron pochtani uchrashuv taklifiga tezda aylantirishning 2 ta oson usuli

Agar siz Outlook elektron pochtasini uchrashuv taklifnomasiga aylantirmoqchi bo'lsangiz, ushbu postga murojaat qilishingiz mumkin. Bu yerda biz siz bilan ikkita tezkor usulni baham ko'ramiz.

Rejalashtirilgan uchrashuv haqida ko'p ma'lumotni o'z ichiga olgan elektron pochta xabarini olganingizda, to'g'ridan-to'g'ri ushbu elektron pochta orqali uchrashuv yaratishni xohlashingiz mumkin. Bunday holatda siz o'zingizning ehtiyojlaringizga qarab quyidagi 2 usuldan birini qo'llashingiz mumkin.

1-usul: Asl elektron pochta qo'shimchalarisiz aylantirish

1. Boshlash uchun kerakli elektron pochta manzilini tanlang.
2. Keyin, "Uy" yorlig'idagi "Javob berish" guruhidagi "Uchrashuv" tugmasini bosing.
3. Quyidagi rasmda ko'rsatilganidek, birdaniga yig'ilish taklifnomasi ko'rsatiladi.

Eslatmalar:

• Shunday qilib, agar asl e-pochtada qo'shimchalar bo'lsa, biriktirmalar yig'ilishga ko'chirilmaydi.
• Ko'rib turganingizdek, yig'ilishda asl elektron pochta sarlavhasi mavjud, masalan, asl jo'natuvchi yoki oluvchilar va boshqalar.

Asl elektron pochta qo'shimchalarini yig'ilishga nusxalash va asl elektron pochta sarlavhasini chiqarib tashlashni istasangiz, 2-usuldan foydalanishingiz mumkin.

2-usul: Asl elektron pochta qo'shimchalari bilan aylantirish

1. Boshlash uchun Outlook VBA muharririni ishga tushirish uchun "Alt + F11" tugmalarini bosing.
2. Keyin quyidagi kodni loyiha yoki modulga nusxalang.

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. Shundan so'ng, muharrirdan chiqing va ushbu makrosni Tez kirish asboblar paneliga (QAT) qo'shing.
4. Nihoyat, e-pochtani tanlang yoki oching va QAT-dagi makros tugmasini bosing.
5. Quyidagi skrinshotda ko'rsatilganidek, bir vaqtning o'zida uchrashuv taklifnomasi paydo bo'ladi. Asl elektron pochta qo'shimchalari kiritilgan va tanada asl elektron pochta sarlavhasi mavjud emas.

Outlook muammolarini hal qiling

Outlook to'liq funksiyali elektron pochta mijozi bo'lsa-da, u hali ham zaifligi kabi xavfli kamchilikdan xalos bo'la olmaydi. Boshqacha qilib aytganda, uni osongina buzish mumkin. Bu shuningdek, Outlook ma'lumotlaringiz doimo xavf ostida ekanligini anglatadi. Bunday holatda eng muhim va zaruriy harakat Outlook uchun muntazam ravishda ma'lumotlarning zaxira nusxalarini yaratishdir. Bundan tashqari, kuchli dasturni qo'lga kiritish oqilona. Outlook tuzatish kabi vosita DataNumen Outlook Repair.

Muallif kirish:

Shirli Chjan ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc sql buzilishi va Outlook ta'mirlash dasturiy mahsulotlar. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com