Jak zachować załączniki podczas odpowiadania w Outlooku?
Gdy przekazujemy wiadomość e-mail w programie Microsoft Outlook, oryginalne załączniki tej wiadomości e-mail pozostają w przesłanej wiadomości. Jednak gdy odpowiadamy na wiadomość e-mail, oryginalne załączniki nie zostaną dołączone do nowej wiadomości zwrotnej. W tym miejscu przedstawimy kilka sztuczek dotyczących zachowywania oryginalnych załączników podczas odpowiadania w programie Microsoft Outlook.
Odpowiadaj z załącznikami, ręcznie kopiując i wklejając
Odpowiadaj z załącznikami automatycznie przez VBA
Jedno kliknięcie, aby odpowiedzieć załącznikami za pomocą Kutools for Outlook
Odpowiadaj z załącznikami, ręcznie kopiując i wklejając
Możemy ręcznie skopiować oryginalne załączniki do wiadomości e-mail i wkleić je w oknie wiadomości z odpowiedzią, gdy później odpowiadamy na wiadomość e-mail.
Krok 1: Kliknij wiadomość e-mail, aby wyświetlić jej podgląd w okienku odczytu.
Krok 2: Kliknij prawym przyciskiem myszy jeden załącznik w wyświetlanej wiadomości e-mail i wybierz plik Zaznacz wszystko z menu po kliknięciu prawym przyciskiem myszy.
Krok 3: Kliknij prawym przyciskiem myszy wybrane załączniki i wybierz plik Skopiuj z menu po kliknięciu prawym przyciskiem myszy.
Krok 4: Odpowiedz na wiadomość e-mail, klikając Odpowiedz Przycisk na Strona główna (lub na pasku narzędzi w programie Outlook 2007).
Krok 5: W oknie wiadomości z odpowiedzią kliknij plik makaron Przycisk na Wiadomość aby wkleić te załączniki.
Jeśli korzystasz z programu Outlook 2013 lub nowszej wersji, kliknij Wyskoczyć w lewym górnym rogu okienka odczytu, aby zwolnić okno wiadomości z odpowiedzią. Kliknij, aby dowiedzieć się więcej…
Krok 6: Zredaguj wiadomość z odpowiedzią i kliknij Wyślij przycisk.
Łatwo odpowiadaj na wiadomości e-mail, używając oryginalnych załączników w programie Outlook:
Kutools dla programu Outlook's Odpowiedz z załącznikiem narzędzie może pomóc w łatwej odpowiedzi na otrzymaną wiadomość e-mail z oryginalnymi załącznikami w programie Outlook. Zobacz poniższe demo:
Pobierz i wypróbuj teraz! (60-dniowy bezpłatny szlak)
Odpowiadaj z załącznikami automatycznie przez VBA
Istnieje makro VBA, które może pomóc w automatycznej odpowiedzi z oryginalnymi załącznikami.
Uwaga: zanim uruchomisz jakiekolwiek makra VBA, musisz włącz makra w programie Microsoft Outlook.
Krok 1: Wybierz wiadomość e-mail, na którą odpowiesz wraz z załącznikami.
Krok 2: Naciśnij inny + F11 klawisze, aby otworzyć okno Microsoft Visual Basic for Applications.
Krok 3: Rozwiń Project1 i Microsoft Outlook Objects na lewym pasku i kliknij dwukrotnie Ta sesja programu Outlook aby go otworzyć.
Krok 4: Wklej następujący kod do okna ThisOutlookSession.
Sub RunReplyWithAttachments()
'Update by Extendoffice 20180830
Dim xReplyItem As Outlook.MailItem
Dim xItem As Object
On Error Resume Next
Set xItem = GetCurrentItem()
If xItem Is Nothing Then Exit Sub
Set xReplyItem = xItem.Reply
CopyAttachments xItem, xReplyItem
xReplyItem.Display
Set xReplyItem = Nothing
Set xItem = Nothing
End Sub
Sub RunReplyAllWithAttachments()
Dim xReplyAllItem As Outlook.MailItem
Dim xItem As Object
Set xItem = GetCurrentItem()
If xItem Is Nothing Then Exit Sub
Set xReplyAllItem = xItem.ReplyAll
CopyAttachments xItem, xReplyAllItem
xReplyAllItem.Display
Set xReplyAllItem = Nothing
Set xItem = Nothing
End Sub
Function GetCurrentItem() As Object
On Error Resume Next
Select Case TypeName(Application.ActiveWindow)
Case "Explorer"
Set GetCurrentItem = Application.ActiveExplorer.Selection.Item(1)
Case "Inspector"
Set GetCurrentItem = Application.ActiveInspector.currentItem
End Select
End Function
Sub CopyAttachments(SourceItem As MailItem, TargetItem As MailItem)
Dim xFilePath As String
Dim xAttachment As Attachment
Dim xFSO As Scripting.FileSystemObject
Dim xTmpFolder As Scripting.Folder
Dim xFldPath As String
Set xFSO = New Scripting.FileSystemObject
Set xTmpFolder = xFSO.GetSpecialFolder(2)
xFldPath = xTmpFolder.Path & "\"
For Each xAttachment In SourceItem.Attachments
If IsEmbeddedAttachment(xAttachment) = False Then
xFilePath = xFldPath & xAttachment.Filename
xAttachment.SaveAsFile xFilePath
TargetItem.Attachments.Add xFilePath, , , xAttachment.DisplayName
xFSO.DeleteFile xFilePath
End If
Next
Set xFSO = Nothing
Set xTmpFolder = Nothing
End Sub
Function IsEmbeddedAttachment(Attach As Attachment)
Dim xAttParent As Object
Dim xCID As String, xID As String
Dim xHTML As String
On Error Resume Next
Set xAttParent = Attach.Parent
xCID = ""
xCID = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
If xCID <> "" Then
xHTML = xAttParent.HTMLBody
xID = "cid:" & xCID
If InStr(xHTML, xID) > 0 Then
IsEmbeddedAttachment = True
Else
IsEmbeddedAttachment = False
End If
End If
End Function
Krok 5: Naciśnij F5 klucz do uruchomienia tego makra. W otwarciu Makra okno dialogowe, kliknij Uruchom OdpowiedzWszystkimZZałącznikami jeśli chcesz odpowiedzieć wszystkim z załącznikami. W przeciwnym razie wybierz Uruchom odpowiedź z załącznikami, następnie kliknij run przycisk.
Następnie otwiera okno Odpowiadanie na wiadomość z załączeniem wszystkich oryginalnych załączników.
Krok 6: Zredaguj wiadomość z odpowiedzią i kliknij Wyślij przycisk.
Odpowiedz z załącznikami automatycznie za pomocą Kutools for Outlook
Połączenia Odpowiedz z załącznikiem użyteczność Kutools dla programu Outlook może pomóc Ci odpowiedzieć na e-maile z oryginalnymi załącznikami za pomocą jednego kliknięcia.
Kutools dla programu Outlook : z ponad 100 przydatnymi dodatkami do Outlooka, bezpłatnie wypróbować bez ograniczeń w ciągu 60 dni.
1. Wybierz wiadomość e-mail zawierającą załączniki, na które chcesz odpowiedzieć.
2. Następnie kliknij Kutools > Odpowiedz z załącznikiem > Odpowiedz z załącznikiem. Zobacz zrzut ekranu:
Następnie wszystkie załączniki wybranej wiadomości e-mail są wymienione w Przywiązany pole wiadomości zwrotnej. Utwórz wiadomość e-mail i wyślij ją.
Jeśli chcesz skorzystać z bezpłatnej wersji próbnej tego narzędzia, przejdź do bezpłatnie pobrać oprogramowanie najpierw, a następnie przejdź do wykonania operacji zgodnie z powyższymi krokami.
Jedno kliknięcie, aby odpowiedzieć załącznikami za pomocą Kutools for Outlook
Jeśli chcesz mieć bezpłatną wersję próbną (60 dni) tego narzędzia, kliknij, aby go pobrać, a następnie przejdź do wykonania operacji zgodnie z powyższymi krokami.
Podobne artykuły:
- Jak zachować załączniki podczas odpowiadania w Outlooku?
- Jak zapisać wszystkie załączniki z wielu wiadomości e-mail do folderu w Outlooku?
- Jak usunąć wszystkie załączniki z wiadomości e-mail w Outlooku?
Najlepsze narzędzia biurowe
Kutools dla programu Outlook - Ponad 100 zaawansowanych funkcji, które usprawnią Twoje perspektywy
🤖 Asystent poczty AI: Natychmiastowe profesjonalne e-maile z magią AI — genialne odpowiedzi jednym kliknięciem, doskonały ton, biegła znajomość wielu języków. Zmień e-mailing bez wysiłku! ...
📧 Automatyzacja poczty e-mail: Poza biurem (dostępne dla POP i IMAP) / Zaplanuj wysyłanie wiadomości e-mail / Automatyczne CC/BCC według reguł podczas wysyłania wiadomości e-mail / Automatyczne przewijanie (Zasady zaawansowane) / Automatyczne dodawanie powitania / Automatycznie dziel wiadomości e-mail od wielu odbiorców na pojedyncze wiadomości ...
📨 Zarządzanie e-mail: Łatwe przywoływanie e-maili / Blokuj oszukańcze wiadomości e-mail według tematów i innych / Usuń zduplikowane wiadomości e-mail / Wiecej opcji / Konsoliduj foldery ...
📁 Załączniki Pro: Zapisz zbiorczo / Odłącz partię / Kompresuj wsadowo / Automatyczne zapisywanie / Automatyczne odłączanie / Automatyczna kompresja ...
🌟 Magia interfejsu: 😊Więcej ładnych i fajnych emotikonów / Zwiększ produktywność programu Outlook dzięki widokom na kartach / Zminimalizuj program Outlook zamiast go zamykać ...
>> Cuda jednym kliknięciem: Odpowiedz wszystkim, dodając przychodzące załączniki / E-maile chroniące przed phishingiem / 🕘Pokaż strefę czasową nadawcy ...
👩🏼🤝👩🏻 Kontakty i kalendarz: Grupowe dodawanie kontaktów z wybranych e-maili / Podziel grupę kontaktów na pojedyncze grupy / Usuń przypomnienia o urodzinach ...
O Cechy 100 Poczekaj na eksplorację! Kliknij tutaj, aby dowiedzieć się więcej.