2 Швидкі способи вставити знімок екрана робочого аркуша Excel у тіло електронної пошти Outlook

Поділитися зараз:

Іноді, замість того, щоб копіювати аркуш Excel у тіло електронної пошти, можливо, ви захочете вставити знімок екрана аркуша. Таким чином, ця стаття покаже 2 способи його отримання.

Багато користувачів хочуть експортувати знімок екрана певного робочого аркуша Excel, а потім вставити знімок екрана в тіло повідомлення електронної пошти Outlook. Тільки на скріншоті значення клітинки змінити не можна. І скріншот можна переглянути, навіть якщо одержувачі не встановлюють MS Excel на своїх комп’ютерах.

Це можна реалізувати двома способами. Перший - це вбудована функція - “Вставити”> “Знімок екрана”, яка детально представлена ​​в наступному Методі 2. А друга - використовує трохи сценаріїв, як показано в Методі 1. Тепер, читайте далі до отримати їх докладно.

Спосіб 1: Вставте знімок екрана вікна Excel

  1. Спочатку відкрийте робочий аркуш Excel, який потрібно вставити в електронну пошту.Вихідний аркуш Excel
  2. Потім запустіть Outlook і створіть новий електронний лист.
  3. Далі, у вікні Повідомлення перейдіть на вкладку “Вставка”.
  4. Згодом натисніть кнопку “Знімок екрана”.Вставте знімок екрана в електронну пошту
  5. У списку “Доступна Windows” виберіть знімок екрана робочого аркуша Excel.
  6. Одразу буде вставлено скріншот робочого аркуша Excel.Вставлений знімок екрана вікна Excel
  7. Тепер ви можете обрізати скріншот за бажанням.

Спосіб 2: Скопіюйте знімок екрана робочого аркуша Excel за допомогою VBA

  1. З самого початку відкрийте файл Excel.
  2. Потім натисніть “Alt + F11”, щоб запустити редактор Excel VBA.
  3. Далі додайте посилання на «Бібліотеку об’єктів MS Outlook» та «Бібліотеку об’єктів MS Word» відповідно до «Як додати посилання на бібліотеку об'єктів у VBA».
  4. Після цього скопіюйте наступний код VBA в проект або модуль.
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

Код VBA - Скопіюйте знімок екрана робочого аркуша Excel у тіло пошти

  1. Пізніше натисніть “F5”, щоб запустити цей макрос.
  2. Відразу з’явиться новий електронний лист.
  3. У маленькому діалоговому вікні натисніть кнопку «Дозволити».Дозвольте Excel отримати доступ до Outlook
  4. Нарешті, скріншот робочого аркуша Excel буде вставлений у тіло пошти.Вставлено знімок екрана робочого аркуша Excel

Під час боротьби з пошкодженнями файлів Outlook

Якщо ви випадково завантажите будь-які заражені вірусом вкладення, ваш файл Outlook, швидше за все, буде атакований і тим самим скомпрометований. У такій ситуації спочатку потрібно запустити антивірусне програмне забезпечення для знищення вірусів. Згодом вам потрібно вкласти гроші у надійну сторонню програму ремонту, таку як DataNumen Outlook Repair, які можуть ремонт PST файл, не потіючи піт.

Вступ автора:

Ширлі Чжан - експерт із відновлення даних у DataNumen, Inc., яка є світовим лідером у галузі технологій відновлення даних, в тому числі відновити mdf - - та перспективні програмні продукти для ремонту. Для отримання додаткової інформації відвідайте WWW.datanumen.com

Поділитися зараз:

Коментарі закриті.