Joskus sen sijaan, että kopioit Excel-laskentataulukon sähköpostin runkoon, haluat ehkä lisätä kuvakaappauksen laskentataulukosta. Siten tässä artikkelissa näytetään 2 tapaa saada se.
Monet käyttäjät haluavat viedä kuvakaappauksen tietystä Excel-laskentataulukosta ja lisätä sitten kuvakaappauksen Outlook-sähköpostiviestin runkoon. Solun arvoja ei voi muuttaa vain kuvakaappauksessa. Ja kuvakaappausta voidaan tarkastella, vaikka vastaanottajat eivät asenna MS Exceliä tietokoneisiinsa.
Tämä voidaan toteuttaa kahdella tavalla. Ensimmäinen on sisäänrakennetulla ominaisuudella - "Insert"> "Screenshot", joka on yksityiskohtaisesti esitetty seuraavassa menetelmässä 2. Ja toinen käyttää vähän komentosarjoja, kuten menetelmä 1 osoittaa. Lue nyt hanki ne yksityiskohtaisesti.
Tapa 1: Lisää kuvakaappaus Excel-ikkunasta
- Avaa ensin Excel-laskentataulukko, jonka haluat lisätä sähköpostiin.
- Käynnistä sitten Outlook ja luo uusi sähköposti.
- Siirry seuraavaksi Viesti-ikkunassa Lisää-välilehdelle.
- Napsauta sitten “Screenshot” -painiketta.
- Valitse Käytettävissä oleva Windows-luettelosta kuvakaappaus Excel-laskentataulukosta.
- Samalla lisätään kuvakaappaus Excel-laskentataulukosta.
- Nyt voit rajata kuvakaappauksen haluamallasi tavalla.
Tapa 2: Kopioi Excel-taulukon näyttökuva VBA: lla
- Avaa Excel-tiedosto heti alusta.
- Käynnistä sitten Excel VBA -editori painamalla Alt + F11.
- Lisää seuraavaksi viittaukset kohtiin ”MS Outlook Object Library” ja ”MS Word Object Library” kohdan ”Objektikirjastoviittauksen lisääminen VBA:ssa".
- Tämän jälkeen kopioi seuraava VBA-koodi projektiin tai moduuliin.
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
- Suorita tämä makro painamalla myöhemmin “F5”.
- Heti uusi sähköposti tulee näkyviin.
- Napsauta pienessä valintaikkunassa Salli-painiketta.
- Lopuksi kuvakaappaus Excel-laskentataulukosta lisätään postin runkoon.
Kun kohtaat Outlook-tiedostovaurioita
Jos lataat vahingossa viruksen tartuttamia liitteitä, Outlook-tiedostoon todennäköisesti hyökätään ja se vaarantuu. Tällaisessa tilanteessa sinun on ensin suoritettava virustentorjuntaohjelma virusten tappamiseksi. Jälkeenpäin sinun on investoitava vankkaan kolmannen osapuolen korjausapuohjelmaan, kuten DataNumen Outlook Repair, joka voi korjaa PST viila rikkomatta hikiä.
Tekijän esittely:
Shirley Zhang on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien palauta mdf ja Outlookin korjausohjelmistotuotteet. Lisätietoja osoitteessa www.datanumen.com