Noen ganger, i stedet for å kopiere Excel-regnearket inn i en e-posttekst, kan det være lurt å sette inn skjermbildet av regnearket. Derfor vil denne artikkelen vise 2 metoder for å få det.
Mange brukere vil eksportere et skjermbilde av et spesifikt Excel-regneark og deretter sette inn skjermbildet i meldingsteksten til en Outlook-e-post. Bare i skjermbildet kan ikke celleverdiene endres. Og skjermbildet kan sees selv om mottakerne ikke installerer MS Excel på datamaskinene sine.
Dette kan realiseres på 2 måter. Den første er av den innebygde funksjonen – “Sett inn” > “Skjermbilde”, som er detaljert introdusert i følgende metode 1. Og den andre bruker litt skripting, som vist i metode 2. Les nå videre til få dem i detalj.
Metode 1: Sett inn skjermbilde av Excel-vinduet
- Først åpner du Excel-regnearket du vil sette inn i e-post.

- Start deretter Outlook og opprett en ny e-post.
- Deretter bytter du til "Sett inn"-fanen i meldingsvinduet.
- Deretter klikker du på "Skjermbilde"-knappen.
- I "Tilgjengelige Windows"-listen velger du skjermbildet av Excel-regnearket.
- Med en gang vil skjermbildet av Excel-regnearket settes inn.
- Nå kan du beskjære skjermbildet når du vil.
Metode 2: Kopier skjermbildet av Excel-regnearket med VBA
- Helt i begynnelsen åpner du Excel-filen.
- Trykk deretter "Alt + F11" for å utløse Excel VBA-editor.
- Legg deretter til referansen til «MS Outlook Object Library» og «MS Word Object Library» i henhold til «Slik legger du til en objektbibliotekreferanse i VBA".
- Etter det kopierer du følgende VBA-kode til et prosjekt eller en modul.
Sub ExportInsert_ScreenshotOfSheet_Mail()
Dim objSheet As Excel.Worksheet
Dim objUsedRange As Excel.Range
Dim objOutlookApp As Outlook.Application
Dim objMail As Outlook.MailItem
Dim objMailDocument As Word.document
'Change "Sheets(1)" to the specific worksheet number
Set objSheet = ActiveWorkbook.Sheets(1)
Set objUsedRange = objSheet.UsedRange
'Copy the screenshot of the sheet
objUsedRange.CopyPicture xlScreen, xlPicture
Set objOutlookApp = CreateObject("Outlook.Application")
Set objMail = objOutlookApp.CreateItem(olMailItem)
objMail.Display
Set objMailDocument = objMail.GetInspector.WordEditor
'Paste the copied screenshot
objMailDocument.Range(0, 0).Paste
End Sub
- Senere, trykk "F5" for å kjøre denne makroen.
- Umiddelbart vil en ny e-post vises.
- I den lille dialogboksen klikker du på "Tillat"-knappen.
- Til slutt vil skjermbildet av Excel-regnearket settes inn i e-postteksten.
Når du konfronterer Outlook-filskade
Hvis du ved et uhell laster ned virusinfiserte vedlegg, er det stor sannsynlighet for at Outlook-filen din blir angrepet og dermed kompromittert. I en slik situasjon må du først kjøre antivirusprogramvare for å drepe virusene. Etterpå må du investere i et robust tredjeparts reparasjonsverktøy, som f.eks DataNumen Outlook Repair, som kan reparere PST fil uten å svette.
Forfatterintroduksjon:
Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert gjenopprette mdf og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med




