Til tider kan du måske indsætte skærmbilledet af regnearket i stedet for at kopiere Excel-regnearket til en e-mail-krop. Således vil denne artikel vise 2 metoder til at få det.
Mange brugere vil gerne eksportere et skærmbillede af et specifikt Excel-regneark og derefter indsætte skærmbilledet i meddelelsesteksten i en Outlook-e-mail. Kun i skærmbilledet kan celleværdierne ikke ændres. Og skærmbilledet kan ses, selvom modtagerne ikke installerer MS Excel på deres computere.
Dette kan realiseres på to måder. Den første er ved den indbyggede funktion - "Indsæt"> "Skærmbillede", som er detaljeret introduceret i følgende metode 2. Og den anden bruger lidt scripting, som vist i metode 1. Læs nu videre til få dem i detaljer.
Metode 1: Indsæt skærmbillede af Excel-vindue
- Først skal du åbne det Excel-regneark, som du vil indsætte i e-mail.

- Start derefter Outlook, og opret en ny e-mail.
- Skift derefter til fanen “Indsæt” i meddelelsesvinduet.
- Klik derefter på knappen "Skærmbillede".
- På listen "Tilgængelige Windows" skal du vælge skærmbilledet til Excel-regnearket.
- Straks indsættes skærmbilledet af Excel-regnearket.
- Nu kan du beskære skærmbilledet efter ønske.
Metode 2: Kopier skærmbillede af Excel-regneark med VBA
- Åbn Excel-filen lige fra starten.
- Tryk derefter på "Alt + F11" for at udløse Excel VBA-editor.
- Tilføj derefter referencen til "MS Outlook Object Library" og "MS Word Object Library" i henhold til "Sådan tilføjer du en objektbiblioteksreference i VBA".
- Derefter kopieres følgende VBA-kode til et projekt eller 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 skal du trykke på “F5” for at køre denne makro.
- Straks vises en ny e-mail.
- Klik på knappen "Tillad" i den lille dialogboks.
- Endelig indsættes skærmbilledet af Excel-regnearket i postteksten.
Når du konfronterer Outlook-filskader
Hvis du ved en fejltagelse downloader virusinficerede vedhæftede filer, er din Outlook-fil sandsynligvis angrebet og derved kompromitteret. I en sådan situation skal du først køre antivirussoftware for at dræbe viraerne. Bagefter skal du investere i et robust reparationsværktøj fra tredjepart, f.eks DataNumen Outlook Repair, Hvilket kan reparation PST fil uden at svede.
Forfatter Introduktion:
Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder gendanne mdf og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com




