Jeśli chcesz szybko skopiować wszystkie wykresy z każdego arkusza w skoroszycie programu Excel do wiadomości e-mail programu Outlook, możesz skorzystać z metody przedstawionej w tym artykule. Może pomóc Ci go zdobyć za jednym zamachem.
Być może utworzyłeś stos wykresów dla statystyk w skoroszycie programu Excel. Później chcesz w pełni wykorzystać te wykresy do utworzenia nowej poczty programu Outlook. Oczywiście możesz ręcznie skopiować je do wiadomości e-mail. Jednak jest to dość kłopotliwe. Dlatego w dalszej części podzielimy się z wami znacznie wygodniejszymi sposobami. Może pomóc ci to zrozumieć, po prostu za pomocą kliknięcia. Teraz przeczytaj, aby uzyskać szczegółowe informacje.
Batch Kopiuj wszystkie wykresy ze skoroszytu programu Excel do wiadomości e-mail programu Outlook
- Na początek otwórz konkretny skoroszyt programu Excel.
- Następnie naciśnij „Alt + F11”, aby uzyskać dostęp do edytora Excel VBA.
- W nowym oknie dodaj „Bibliotekę obiektów MS Outlook” i „Bibliotekę obiektów MS Word”. Kroki są podobne do tych opisanych w artykule – „Jak dodać odwołanie do biblioteki obiektów w języku VBA".
- Następnie umieść następujący kod VBA w projekcie „ThisWorkbook”.
Sub CopyAllChartsToOutlookEmail()
Dim objOutlookApp As Outlook.Application
Dim objMail As Outlook.MailItem
Dim objMailDocument As Word.Document
Dim objSheet As Excel.Worksheet
Dim objChart As Excel.ChartObject
'Get Outlook Application
On Error Resume Next
Set objOutlookApp = GetObject(, "Outlook.Application")
If objOutlookApp Is Nothing Then
Set objOutlookApp = CreateObject("Outlook.Application")
End If
'Create an Outlook Email
Set objMail = objOutlookApp.CreateItem(olMailItem)
objMail.Display
Set objMailDocument = objMail.GetInspector.WordEditor
'Copy All Charts from Each Sheet to the New Email
For Each objSheet In ActiveWorkbook.Worksheets
For Each objChart In objSheet.ChartObjects
objChart.Copy
objMailDocument.Range(0, 0).Paste
Next
Next
End Sub
- Następnie naciśnij przycisk „F5” lub kliknij ikonę „Uruchom” na pasku narzędzi, aby uruchomić makro.
- Następnie wiadomość e-mail programu Outlook zostanie wyświetlona z wyskakującym ostrzeżeniem, pokazanym na poniższym obrazie.
- Po wybraniu i kliknięciu przycisku „Zezwól” wszystkie wykresy ze źródłowego skoroszytu programu Excel zostaną skopiowane do tej poczty jednocześnie.
Chroń program Outlook przed wszystkimi zagrożeniami
Jak wszyscy wiemy, nasze dane otacza wiele zagrożeń, w tym oczywiście pliki danych programu Outlook. Ponadto nikt nie jest niechętny korupcji programu Outlook. Dlatego każdy użytkownik programu Outlook musi podjąć działania, aby zabezpieczyć program Outlook przed wszelkiego rodzaju potencjalnymi zagrożeniami. Mówiąc konkretnie, użytkownicy muszą regularnie tworzyć kopie zapasowe danych programu Outlook, co może ułatwić Odzyskiwanie programu Outlook dużo. Co więcej, lepiej zaopatrz się w potężne narzędzie do naprawy plików PST, takie jak DataNumen Outlook Repair.
Wprowadzenie autora:
Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym uszkodzony plik sql i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com