Czasami zamiast kopiować arkusz programu Excel do treści wiadomości e-mail, możesz wstawić zrzut ekranu arkusza. Dlatego ten artykuł pokaże 2 metody, aby go zdobyć.
Wielu użytkowników chciałoby wyeksportować zrzut ekranu określonego arkusza programu Excel, a następnie wstawić zrzut ekranu do treści wiadomości e-mail programu Outlook. Tylko na zrzucie ekranu wartości komórek nie można zmienić. A zrzut ekranu można wyświetlić, nawet jeśli odbiorcy nie instalują MS Excel na swoich komputerach.
Można to zrealizować na 2 sposoby. Pierwszym z nich jest wbudowana funkcja – „Wstaw” > „Zrzut ekranu”, która została szczegółowo przedstawiona w następującej Metodzie 1. A druga wykorzystuje trochę skryptów, jak pokazano w Metodzie 2. Teraz czytaj dalej zdobądź je szczegółowo.
Metoda 1: Wstaw zrzut ekranu okna programu Excel
- Najpierw otwórz arkusz programu Excel, który chcesz wstawić do wiadomości e-mail.
- Następnie uruchom program Outlook i utwórz nową wiadomość e-mail.
- Następnie w oknie Wiadomość przejdź do zakładki „Wstaw”.
- Następnie kliknij przycisk „Zrzut ekranu”.
- Na liście „Dostępne okna” wybierz zrzut ekranu arkusza programu Excel.
- Natychmiast zostanie wstawiony zrzut ekranu arkusza programu Excel.
- Teraz możesz dowolnie przycinać zrzut ekranu.
Metoda 2: Skopiuj zrzut ekranu arkusza programu Excel za pomocą języka VBA
- Na samym początku otwórz plik Excel.
- Następnie naciśnij „Alt + F11”, aby uruchomić edytor Excel VBA.
- Następnie dodaj odwołanie do „Biblioteki obiektów MS Outlook” i „Biblioteki obiektów MS Word” zgodnie z „Jak dodać odwołanie do biblioteki obiektów w języku VBA".
- Następnie skopiuj następujący kod VBA do projektu lub modułu.
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
- Później naciśnij „F5”, aby uruchomić to makro.
- Natychmiast pojawi się nowy e-mail.
- W małym oknie dialogowym kliknij przycisk „Zezwól”.
- Na koniec zrzut ekranu arkusza programu Excel zostanie wstawiony do treści wiadomości.
W obliczu uszkodzenia pliku programu Outlook
Jeśli przypadkowo pobierzesz załączniki zainfekowane wirusem, plik programu Outlook najprawdopodobniej zostanie zaatakowany, a tym samym przejęty. W takiej sytuacji musisz najpierw uruchomić oprogramowanie antywirusowe, aby zabić wirusy. Następnie musisz zainwestować w solidne narzędzie do naprawy stron trzecich, takie jak DataNumen Outlook Repair, Który może naprawa PST plik bez zerwania potu.
Wprowadzenie autora:
Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym odzyskać mdf i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com