Jak kopírovat názvy všech příloh, když odpovídáte v aplikaci Outlook?
Při odpovídání na e-mail ve formátu RTF (formátovaný jako Rich Format) v Outlooku zkopíruje názvy všech příloh a automaticky se vloží do těla zprávy (viz snímek obrazovky níže). Při odpovědi na e-mail ve formátu HTML v aplikaci Outlook však v odpovědi na e-mail chybí přílohy. Zde tento článek představí některé metody kopírování názvu všech příloh při odpovídání na e-maily nebo přímo do přijatých e-mailů.
- Zkopírujte názvy všech příloh, když odpovíte změnou e-mailu HTML na RTF
- Při odpovědi pomocí VBA zkopírujte názvy všech příloh
- Zkopírujte všechny názvy příloh, když odpovídáte úžasným nástrojem
Při odpovědi se změnou HTML na RTF zkopírujte názvy všech příloh
Pokud jsme před odpovědí převedli e-mail HTML na RTF, budou se po klepnutí na Domů> Odpovědět v Outlooku zkopírovat jména všech příloh do zprávy s odpověďmi.
1. Poklepáním otevřete e-mail, jehož jména příloh musíte zkopírovat, a poté klikněte na Zpráva > Akce > Upravit zprávu v okně zprávy. Viz screenshot:
2. Pokračujte kliknutím Formát textu > Bohatý texta poté e-mail uložte a zavřete.
3. Nyní se vrátíte do hlavního zobrazení. Pokračujte ve výběru e-mailu a klikněte Domovská stránka > odpověď.
4. Nyní jsou názvy všech příloh zkopírovány z původního e-mailu a vloženy do odpovědi, jak je uvedeno níže. Napište prosím odpověď a odešlete ji.
Při odpovědi pomocí VBA zkopírujte názvy všech příloh
Tato metoda zavede makro VBA ke kopírování názvů všech příloh při odpovědi na e-mail a poté vloží názvy do těla zprávy odpovědi na e-mail v aplikaci Outlook.
1. lis Další + F11 současně otevřete okno Microsoft Visual Basic pro aplikace.
2. V levém Průzkumníkovi projektu rozbalte Projekt 1, dvojitým kliknutím otevřete ThisOutlookSession okno (viz snímek obrazovky níže) a do okna vložte níže uvedený kód.
VBA: Při odpovídání na e-maily v aplikaci Outlook zkopírujte název všech příloh
Option Explicit Private WithEvents oExpl As Explorer Private WithEvents oItem As MailItem Private bAttachEvent As Boolean Private Sub Application_Startup() Set oExpl = Application.ActiveExplorer bAttachEvent = False End Sub Private Sub oExpl_SelectionChange() On Error Resume Next Set oItem = oExpl.Selection.Item(1) End Sub ' Reply Private Sub oItem_Reply(ByVal Response As Object, Cancel As Boolean) Dim oAtt As Attachment Dim sAtts As String Dim olInspector As Outlook.Inspector Dim olDocument As Word.Document Dim olSelection As Word.Selection If bAttachEvent Or oItem.Attachments.Count = 0 Then Exit Sub End If Cancel = True bAttachEvent = True sAtts = "" For Each oAtt In oItem.Attachments sAtts = sAtts & "<<" & oAtt.FileName & ">> " Next oAtt Dim oResponse As MailItem Set oResponse = oItem.Reply oResponse.Display Set olInspector = Application.ActiveInspector() Set olDocument = olInspector.WordEditor Set olSelection = olDocument.Application.Selection olSelection.InsertBefore sAtts bAttachEvent = False Set oItem = Nothing End Sub ' Reply All Private Sub oItem_ReplyAll(ByVal Response As Object, Cancel As Boolean) Dim oAtt As Attachment Dim sAtts As String Dim olInspector As Outlook.Inspector Dim olDocument As Word.Document Dim olSelection As Word.Selection If bAttachEvent Or oItem.Attachments.Count = 0 Then Exit Sub End If Cancel = True bAttachEvent = True sAtts = "" For Each oAtt In oItem.Attachments sAtts = sAtts & "<<" & oAtt.FileName & ">> " Next oAtt Dim oResponse As MailItem Set oResponse = oItem.ReplyAll oResponse.Display Set olInspector = Application.ActiveInspector() Set olDocument = olInspector.WordEditor Set olSelection = olDocument.Application.Selection olSelection.InsertBefore sAtts bAttachEvent = False Set oItem = Nothing End Sub
3, klikněte Nástroje > Reference.
4. V úvodním okně Reference - Projekt 1 pro Outlook 2016 zkontrolujte Knihovna objektů Microsoft Word 16.0 v poli Dostupné reference a klepněte na OK knoflík. Viz screenshot:
Poznámka: Vyberte prosím Knihovna objektů Microsoft Word 15.0 reference, pokud pracujete s Outlookem 2013, nebo Knihovna objektů Microsoft Word 14.0 odkaz na Outlook 2010.
5. Uložte soubor VBA a zavřete okno Microsoft Visual Basic for Applications.
6. Nyní se vrátíte do hlavního rozhraní aplikace Outlook. Vyberte e-mail, na který budete odpovídat, a klikněte Domovská stránka > odpověď or Odpovědět všem.
Poznámka: Pokud nejsou názvy příloh zkopírovány a vloženy do e-mailu s odpovědí, restartujte prosím aplikaci Outlook a odpovězte znovu.
A teď jsou všechny přílohy zkopírovány z vybraného e-mailu a vloženy do odpovídajícího e-mailu. Viz snímek obrazovky:
Zkopírujte všechny názvy příloh, když odpovídáte úžasným nástrojem
Pokud máte Kutools pro aplikaci Outlook nainstalován, můžete použít jeho Kopírovat jména funkce pro rychlé zkopírování všech názvů příloh z přijatého e-mailu a následné snadné vložení odpovědi do aplikace Outlook.
Kutools pro aplikaci Outlook: Přidejte do aplikace Outlook více než 100 užitečných nástrojů, které můžete zdarma vyzkoušet bez omezení do 60 dnů. Více Zkušební verze zdarma nyní
1. Vyberte e-mail, na který budete odpovídat, a klikněte Kutools > Nástroje pro připojení > Kopírovat jména.
Poté se zobrazí dialogové okno s oznámením, že názvy příloh jsou zkopírovány do schránky. Klepněte na OK zavřít.
2. Pokračujte kliknutím Domovská stránka > odpověď odpovědět na vybraný e-mail.
3. V okně odpovědi na zprávu vložte kurzor do těla zprávy a stiskněte Ctrl + V klávesy pro snadné vložení názvů příloh.
Snadno odpovídejte na vybrané e-maily se všemi původními přílohami uloženými v aplikaci Outlook
Obecně se původní přílohy při odpovídání na e-maily v Outlooku odstraní. Ale s fantastickým Odpovězte s přílohou Díky funkci Kutools pro Outlook si můžete snadno ponechat všechny přílohy e-mailů, když na ně v aplikaci Outlook odpovíte.
Kliknutím získáte 60denní bezplatnou zkušební verzi bez omezení!
Související články:
Kutools pro Outlook - přináší do aplikace Outlook 100 pokročilých funkcí a usnadňuje práci!
- Auto CC / BCC podle pravidel při odesílání e-mailů; Automatické předávání Více e-mailů podle zvyku; Automatická odpověď bez serveru Exchange a dalších automatických funkcí ...
- Varování BCC - zobrazit zprávu, když se pokusíte odpovědět všem pokud je vaše e-mailová adresa v seznamu BCC; Připomenout, když chybí přílohya další připomínající funkce ...
- Odpovědět (Vše) Se všemi přílohami v e-mailové konverzaci; Odpovězte na mnoho e-mailů během několika sekund; Automatické přidání pozdravu při odpovědi; Přidat datum do předmětu ...
- Nástroje pro přílohy: Spravujte všechny přílohy ve všech e-mailech, Automatické odpojení, Komprimovat vše, Přejmenovat vše, Uložit vše ... Rychlá zpráva, Počítat vybrané e-maily...
- Výkonné nevyžádané e-maily podle zvyku; Odeberte duplicitní e-maily a kontakty... Umožní vám dělat chytřejší, rychlejší a lepší v Outlooku.


You are guest
or post as a guest, but your post won't be published automatically.
Be the first to comment.