Hvis du ønsker å sende et Excel-regneark som en e-post, i stedet for å legge det til en e-post som vedlegg, kan du bruke de to metodene som er introdusert i denne artikkelen.
Noen ganger, i motsetning til å legge ved en Excel-fil til en e-post som vedlegg, kan du ønske å sette inn et Excel-regneark direkte i e-postteksten, med andre ord, sende det som en e-post. Som svar på dette kravet kan du bruke en av de følgende 2 metodene avhengig av om du vil sende i MS Excel eller MS Outlook. Les nå videre for å få detaljerte operasjoner.

Metode 1: Send i Excel
- Helt i begynnelsen åpner du kilden Excel-filen.
- Klikk deretter på nedoverpilen i hurtigtilgangsverktøylinjen.
- Fra rullegardinlisten bør du velge "Flere kommandoer".
- Deretter bør du legge til "Send til e-postmottaker" til hurtigtilgangsverktøylinjen.
- Først velger du "Alle kommandoer" i rullegardinlisten "Velg kommandoer fra:".
- Deretter finner du og velger kommandoen "Send til e-postmottaker".
- Klikk deretter på "Legg til"-knappen i midten.
- Etter å ha lagt den til på høyre side, klikk på "OK" for å lagre endringene.
- Deretter går du tilbake til hovedvinduet i Excel og klikker på "Send til e-postmottaker"-knappen i hurtigtilgangsverktøylinjen.
- I popup-dialogboksen velger du "Send gjeldende ark som meldingstekst".
- Senere vises en ny verktøylinje, som følgende skjermbilde. Nå kan du komponere e-postdetaljene i henhold til dine behov.
- Til slutt klikker du på "Send dette arket"-knappen for å sende ut dette arket som e-post.
Metode 2: Send i Outlook
- For det første, start Outlook-programmet.
- Trykk deretter på "Alt + F11"-tastene for å åpne Outlook VBA-editor.
- Deretter åpner du en ny modul og kopierer følgende VBA-koder inn i den.
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
- Etter det kan du klikke på "Kjør"-ikonet i verktøylinjen.
- Makroen utløses med en gang.
- Deretter må du kopiere filbanen til den spesifikke Excel-filen til inndataboksen og trykke "OK".
- Til slutt vil en ny e-post som inneholder Excel-regnearket i brødteksten bli lagret i e-postmappen "Utkast". Du kan finne det som følgende skjermbilde:
Håndter plagsomme PST-problemer taktfullt
På grunn av det faktum at Outlook PST-filen er utsatt for feil, kan du ha støtt på en rekke problemer i Outlook. Derfor, for å unngå smertefulle PST skade, er det lurt å ta regelmessige sikkerhetskopier av data for PST-filen din. Videre må du ha et kraftig fikseverktøy i nærheten, som DataNumen Outlook Repair.
Forfatterintroduksjon:
Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert sql skade og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med






