2 rýchle spôsoby odoslania tabuľky programu Excel ako e-mailu programu Outlook

Ak chcete odoslať pracovný hárok programu Excel ako e-mail, môžete ho namiesto pridania k e-mailu ako prílohu použiť dvoma spôsobmi uvedenými v tomto článku. 

Na rozdiel od priloženia súboru programu Excel k e-mailu ako prílohu môžete niekedy chcieť priamo vložiť hárok programu Excel do tela e-mailu, inými slovami, poslať ho ako e-mail. V reakcii na túto požiadavku môžete použiť ktorýkoľvek z nasledujúcich 2 spôsobov podľa toho, či chcete odosielať v programe MS Excel alebo MS Outlook. Teraz čítajte ďalej a získate podrobné operácie.

Metóda 1: Odoslanie v programe Excel

1. Hneď na úvod otvorte zdrojový súbor programu Excel.
2. Potom kliknite na šípku nadol na paneli s nástrojmi Rýchly prístup.
3. Z rozbaľovacieho zoznamu by ste mali zvoliť „Viac príkazov“.
4. Ďalej by ste mali pridať „Odoslať príjemcovi pošty“ na panel s nástrojmi Rýchly prístup.

• Najskôr v rozbaľovacom zozname „Vybrať príkazy z:“ vyberte možnosť „Všetky príkazy“.
• Potom vyhľadajte a vyberte príkaz „Odoslať príjemcovi pošty“.
• Ďalej kliknite na tlačidlo „Pridať“ v strede.
• Po pridaní na pravú stranu uložte zmeny kliknutím na „OK“.

5. Potom sa vráťte do hlavného okna programu Excel a na paneli s nástrojmi Rýchly prístup kliknite na tlačidlo „Odoslať príjemcovi pošty“.
6. V rozbaľovacom dialógovom okne vyberte možnosť „Odoslať aktuálny hárok ako telo správy“.
7. Neskôr sa zobrazí nový panel s nástrojmi, napríklad nasledujúca snímka obrazovky. Teraz môžete podľa potreby zostaviť e-mailovú adresu.
8. Nakoniec kliknite na tlačidlo „Odoslať tento hárok“, aby ste tento hárok odoslali ako e-mail.

Metóda 2: Odosielanie v programe Outlook

1. V prvom rade spustite program Outlook.
2. Potom stlačte klávesovú skratku „Alt + F11“, aby ste otvorili editor Outlook VBA.
3. Následne otvorte nový modul a skopírujte do neho nasledujúce kódy 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. Potom môžete kliknúť na ikonu „Spustiť“ na paneli nástrojov.
5. Makro sa spustí naraz.
6. Potom budete musieť skopírovať cestu k súboru do konkrétneho súboru programu Excel do vstupného poľa a stlačiť tlačidlo „OK“.
7. Nakoniec bude nový e-mail obsahujúci hárok programu Excel v tele uložený do priečinka pošty „Koncepty“. Nájdete ho ako nasledujúci obrázok obrazovky:

Vyrovnajte sa s problémovými problémami s PST efektívne

Vzhľadom na to, že súbor PST v Outlooku je náchylný na chyby, mohli ste sa vo svojom Outlooku stretnúť s rôznymi problémami. Preto, aby sa zabránilo bolestivé Poškodenie PST, je rozumné robiť pravidelné zálohy dát pre váš súbor PST. Ďalej musíte mať v blízkosti silný nástroj na opravu, napríklad 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 poškodenie sql a výhľadové softvérové ​​produkty na opravu. Pre viac informácií navštívte www.datanumen. S