Excel İş Vərəqini Outlook E-poçtu kimi Göndərməyin 2 Sürətli Metodları

Excel iş vərəqini e-poçt kimi göndərmək istəyirsinizsə, onu əlavə olaraq e-poçta əlavə etmək əvəzinə, bu məqalədə təqdim olunan iki üsuldan istifadə edə bilərsiniz. 

Bəzən bir Excel faylını e-poçta əlavə olaraq əlavə etməkdən fərqli olaraq, siz Excel iş vərəqini e-poçtun mətninə birbaşa daxil etmək, başqa sözlə, onu e-poçt kimi göndərmək istəyə bilərsiniz. Bu tələbə cavab olaraq, siz MS Excel və ya MS Outlook-da göndərmək istəməyinizdən asılı olaraq aşağıdakı 2 vasitədən birini tətbiq edə bilərsiniz. İndi ətraflı əməliyyatları əldə etmək üçün oxuyun.

Metod 1: Excel-də göndərin

1. Ən başlanğıcda mənbə Excel faylını açın.
2. Sonra Tez Giriş Alətlər Panelində aşağı oxu klikləyin.
3. Açılan siyahıdan "Daha çox əmrlər" seçməlisiniz.
4. Sonra, Tez Giriş Alətlər Panelinə "Poçt Alıcısına Göndər" əlavə etməlisiniz.

• Əvvəlcə "Əmrləri seçin:" açılır siyahısında "Bütün əmrlər" seçin.
• Sonra "Poçt alıcısına göndər" əmrini tapın və seçin.
• Sonra mərkəzdəki "Əlavə et" düyməsini basın.
• Sağ tərəfə əlavə etdikdən sonra dəyişiklikləri saxlamaq üçün "OK" düyməsini basın.

5. Bundan sonra, əsas Excel pəncərəsinə qayıdın və Sürətli Giriş Alətlər Panelində "Mail Alıcısına Göndər" düyməsini basın.
6. Açılan informasiya qutusunda "Cari hesabatı mesajın əsas hissəsi kimi göndər" seçin.
7. Daha sonra aşağıdakı ekran görüntüsü kimi yeni alətlər paneli görünəcək. İndi ehtiyaclarınıza uyğun olaraq e-poçt təfərrüatlarını tərtib edə bilərsiniz.
8. Nəhayət, bu vərəqi e-poçt kimi göndərmək üçün “Bu vərəqi göndər” düyməsini klikləyin.

Metod 2: Outlook-da göndərin

1. İlk növbədə, Outlook proqramınızı işə salın.
2. Sonra Outlook VBA redaktorunu açmaq üçün "Alt + F11" düymələrini basın.
3. Daha sonra yeni modul açın və aşağıdakı VBA kodlarını ona kopyalayın.

Sub SendanExcelWorksheetAsEmail()
    Dim strExcelFile As String
    Dim objExcelApp As Excel.Application
    Dim objExcelWorkBook As Excel.Workbook
    Dim objExcelWorkSheet As Excel.Worksheet
    Dim objMail As Outlook.MailItem
 
    strExcelFile = InputBox("Copy the file path to the specific excel file here:", "Specify Excel file", "E:\Contacts.xlsx")
 
    On Error Resume Next
    Set objExcelApp = CreateObject("Excel.Application")
    Set objExcelWorkBook = objExcelApp.Workbooks.Open(strExcelFile)
    Set objExcelWorkSheet = objExcelWorkBook.Sheets("Sheet1")
 
    'Change to your own desired email body
    objExcelWorkSheet.MailEnvelope.Introduction = "Message Body"
    Set objMail = objExcelWorkSheet.MailEnvelope.Item
    With objMail
         'Change the recipient and subject as per your needs
         .To = "frank@datanumen.com"
         .Subject = objExcelWorkSheet.Name
         'Use .Send to send it out directly
         .Save
    End With
 
    objExcelApp.Quit
End Sub

4. Bundan sonra, alətlər panelində "Çalış" işarəsini vura bilərsiniz.
5. Bir anda makro işə salınacaq.
6. Sonra sizdən fayl yolunu xüsusi Excel faylına daxiletmə qutusuna köçürmək və "OK" düyməsini sıxmaq tələb olunacaq.
7. Nəhayət, bədəndə Excel iş vərəqini ehtiva edən yeni e-poçt “Qaralamalar” poçt qovluğunda saxlanacaq. Bunu aşağıdakı ekran görüntüsü kimi tapa bilərsiniz:

Problemli PST Problemlərinin öhdəsindən nəzakətlə yanaşın

Outlook PST faylının xətaya meyilli olması səbəbindən Outlook-da müxtəlif problemlərlə qarşılaşmış ola bilərsiniz. Bu səbəbdən ağrılı olmamaq üçün PST zədəsi, PST faylınız üçün müntəzəm məlumat ehtiyat nüsxələrini çıxarmaq müdrikdir. Bundan əlavə, yaxınlıqda güclü bir düzəltmə aləti saxlamalısınız DataNumen Outlook Repair.

Müəllif Giriş:

Shirley Zhang məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc sql ziyanı və Outlook təmiri proqram məhsulları. Ətraflı məlumat üçün ziyarət edin www.datanumen.com