A volte, invece di copiare il foglio di lavoro di Excel nel corpo di un'e-mail, potresti voler inserire lo screenshot del foglio di lavoro. Pertanto, questo articolo mostrerà 2 metodi per ottenerlo.
Molti utenti desiderano esportare uno screenshot di un foglio di lavoro Excel specifico e quindi inserire lo screenshot nel corpo del messaggio di un'e-mail di Outlook. Solo nello screenshot, i valori della cella non possono essere modificati. E lo screenshot può essere visualizzato anche se i destinatari non installano MS Excel sui loro computer.
Questo può essere realizzato con 2 mezzi. Il primo è tramite la funzione integrata - "Inserisci" > "Screenshot", che viene introdotta in modo elaborato nel seguente Metodo 1. E il secondo utilizza un po' di scripting, come mostrato nel Metodo 2. Ora, continua a leggere ottenerli in dettaglio.
Metodo 1: inserisci lo screenshot della finestra di Excel
- Prima di tutto, apri il foglio di lavoro di Excel che desideri inserire nell'e-mail.

- Quindi, avvia Outlook e crea una nuova email.
- Successivamente, nella finestra Messaggio, passa alla scheda "Inserisci".
- Successivamente, fai clic sul pulsante "Screenshot".
- Nell'elenco "Finestre disponibili", seleziona lo screenshot del foglio di lavoro di Excel.
- Immediatamente, verrà inserito lo screenshot del foglio di lavoro di Excel.
- Ora puoi ritagliare lo screenshot a piacimento.
Metodo 2: copia lo screenshot del foglio di lavoro di Excel con VBA
- All'inizio, apri il file Excel.
- Quindi, premi "Alt + F11" per attivare l'editor VBA di Excel.
- Successivamente, aggiungi il riferimento a "MS Outlook Object Library" e "MS Word Object Library" secondo "Come aggiungere un riferimento a una libreria di oggetti in VBA".
- Successivamente, copia il seguente codice VBA in un progetto o modulo.
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
- Successivamente, premi "F5" per eseguire questa macro.
- Immediatamente, verrà visualizzata una nuova e-mail.
- Nella piccola finestra di dialogo, fai clic sul pulsante "Consenti".
- Infine, lo screenshot del foglio di lavoro di Excel verrà inserito nel corpo della posta.
Quando si affrontano i danni ai file di Outlook
Se scarichi accidentalmente allegati infetti da virus, è molto probabile che il tuo file di Outlook venga attaccato e quindi compromesso. In una situazione del genere, devi prima eseguire un software antivirus per uccidere i virus. Successivamente, è necessario investire in una solida utility di riparazione di terze parti, ad esempio DataNumen Outlook Repair, Che può riparare PST file senza sudare.
Introduzione dell'autore:
Shirley Zhang è un'esperta di recupero dati in DataNumen, Inc., che è il leader mondiale nelle tecnologie di recupero dati, tra cui recuperare mdf e prodotti software di riparazione di Outlook. Per maggiori informazioni visita www.datanumen.com




