2 hurtige metoder til at sende et Excel-regneark som en Outlook-e-mail

Hvis du gerne vil sende et Excel-regneark som en e-mail, i stedet for at tilføje det til en e-mail som vedhæftet fil, kan du bruge de to metoder, der er introduceret i denne artikel. 

Til tider, i modsætning til at vedhæfte en Excel-fil til en e-mail som vedhæftet fil, kan du ønske at indsætte et Excel-regneark direkte i e-mail-teksten, med andre ord, sende det som en e-mail. Som svar på dette krav kan du anvende en af ​​følgende 2 midler afhængigt af, om du vil sende i MS Excel eller MS Outlook. Læs nu videre for at få de detaljerede operationer.

Metode 1: Send i Excel

1. Helt i starten skal du åbne Excel-kildefilen.
2. Klik derefter på pil ned i værktøjslinjen Hurtig adgang.
3. Fra rullelisten skal du vælge "Flere kommandoer".
4. Dernæst skal du tilføje "Send til mail-modtager" til værktøjslinjen Hurtig adgang.

• Først skal du vælge "Alle kommandoer" i rullelisten "Vælg kommandoer fra:".
• Find og vælg derefter kommandoen "Send til mailmodtager".
• Klik derefter på knappen "Tilføj" i midten.
• Når du har tilføjet det til højre side, skal du klikke på "OK" for at gemme ændringerne.

5. Gå derefter tilbage til hovedvinduet i Excel og klik på knappen "Send til mailmodtager" i værktøjslinjen Hurtig adgang.
6. I pop op-dialogboksen skal du vælge "Send det aktuelle ark som meddelelsestekst".
7. Senere vises en ny værktøjslinje, som det følgende skærmbillede. Nu kan du sammensætte e-mail-detaljerne efter dine behov.
8. Til sidst skal du klikke på knappen "Send dette ark" for at sende dette ark som e-mail.

Metode 2: Send i Outlook

1. Start med at starte dit Outlook-program.
2. Tryk derefter på “Alt + F11” -tasten for at åbne Outlook VBA-editor.
3. Åbn derefter et nyt modul og kopier følgende VBA-koder ind i det.

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. Derefter kan du klikke på ikonet "Kør" på værktøjslinjen.
5. Straks udløses makroen.
6. Derefter bliver du bedt om at kopiere filstien til den specifikke Excel-fil ind i inputboksen og trykke på "OK".
7. Endelig vil en ny e-mail indeholdende Excel-regnearket i brødteksten blive gemt i postmappen "Kladder". Du kan finde det som følgende skærmbillede:

Håndter besværlige PST-problemer taktfuldt

På grund af det faktum, at Outlook PST-fil er fejltilbøjelig, kan du have stødt på en række problemer i din Outlook. Derfor, for at undgå smertefuldt PST-beskadigelse, er det klogt at lave regelmæssige sikkerhedskopier af data til din PST-fil. Desuden skal du have et potent fixværktøj i nærheden, f.eks DataNumen Outlook Repair.

Forfatter Introduktion:

Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder sql skader og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com