2 бързи метода за изпращане на работен лист на Excel като имейл в Outlook

Ако искате да изпратите работен лист на Excel като имейл, вместо да го добавяте към имейл като прикачен файл, можете да използвате двата метода, въведени в тази статия. 

Понякога, за разлика от прикачването на файл на Excel към имейл като прикачен файл, може да пожелаете директно да вмъкнете работен лист на Excel в тялото на имейла, с други думи, да го изпратите като имейл. В отговор на това изискване можете да приложите някое от следните 2 средства в зависимост от това дали искате да изпратите в MS Excel или MS Outlook. Сега прочетете, за да получите подробни операции.

Метод 1: Изпращане в Excel

1. В самото начало отворете изходния файл на Excel.
2. След това кликнете върху стрелката надолу в лентата с инструменти за бърз достъп.
3. От падащия списък трябва да изберете „Още команди“.
4. След това трябва да добавите „Изпращане до получателя на пощата“ към лентата с инструменти за бърз достъп.

• Първо, изберете „Всички команди“ в падащия списък „Избор на команди от:“.
• След това намерете и изберете командата „Изпращане до получателя на пощата“.
• След това кликнете върху бутона „Добавяне“ в центъра.
• След като го добавите от дясната страна, кликнете върху „OK“, за да запазите промените.

5. След това се върнете в главния прозорец на Excel и щракнете върху бутона „Изпращане до получателя на пощата“ в лентата с инструменти за бърз достъп.
6. В изскачащия диалогов прозорец изберете „Изпращане на текущия лист като тяло на съобщението“.
7. По-късно ще се покаже нова лента с инструменти, като следващата екранна снимка. Сега можете да съставяте имейл данните според вашите нужди.
8. Накрая кликнете върху бутона „Изпрати този лист“, за да изпратите този лист като имейл.

Метод 2: Изпращане в Outlook

1. На първо място стартирайте вашата програма Outlook.
2. След това натиснете бутоните „Alt + F11“, за да отворите редактора на Outlook VBA.
3. Впоследствие отворете нов модул и копирайте следните VBA кодове в него.

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. След това можете да щракнете върху иконата „Run“ в лентата с инструменти.
5. Веднага ще се задейства макросът.
6. След това ще трябва да копирате пътя на файла към конкретния файл на Excel в полето за въвеждане и натиснете „OK“.
7. И накрая, нов имейл, съдържащ работния лист на Excel в тялото, ще бъде запазен в пощенската папка „Чернови“. Можете да го намерите като следната екранна снимка:

Справете се с проблемните проблеми с PST тактично

Поради факта, че Outlook PST файлът е склонен към грешки, може да сте срещнали различни проблеми във вашия Outlook. Ето защо, за да се избегне болезнеността PST щети, разумно е да правите редовни архиви на данни за вашия PST файл. Освен това трябва да държите в близост мощен инструмент за фиксиране, например DataNumen Outlook Repair.

Въведение на автора:

Шърли Джанг е експерт по възстановяване на данни в DataNumen, Inc., която е световен лидер в технологиите за възстановяване на данни, включително sql щети и outlook софтуерни продукти за ремонт. За повече информация посетете WWW.datanumen.com