Přejít k hlavnímu obsahu

Jak v Outlooku tisknout pouze přílohy z jednoho e-mailu nebo vybraných e-mailů?

Autor: Sun Naposledy změněno: 2024-08-28

V Outlooku můžete e-maily tisknout, ale tiskli jste přílohy pouze z jednoho e-mailu nebo vybraných e-mailů v Outlooku? V tomto článku představuji triky při řešení této úlohy.

Tiskněte přílohy pouze z jednoho e-mailu pomocí funkce Rychlý tisk

Tisknout přílohy pouze z vybraných e-mailů pomocí VBA


Tiskněte přílohy pouze z jednoho e-mailu pomocí funkce Rychlý tisk

Chcete-li tisknout přílohy pouze bez těla e-mailu, můžete použít funkci Rychlý tisk.

1. V okně zprávy klepněte pravým tlačítkem myši na přílohu, kterou chcete vytisknout, vyberte Rychlá tisk z kontextové nabídky.
příloha k tisku dokumentu 1

2. Pak klikněte na tlačítko Uložit > Uložit uložit soubor přílohy na místo.
příloha k tisku dokumentu 2
příloha k tisku dokumentu 3

3. Nyní přejděte do umístění, kde jste umístili soubor přílohy, a otevřete soubor, který chcete vytisknout jako obvykle.


Tisknout přílohy pouze z vybraných e-mailů pomocí VBA

Chcete-li vytisknout přílohy z vybraných e-mailů, můžete použít kód VBA.

1. Vyberte e-maily, které chcete vytisknout, stiskněte Alt + F11 klíče k povolení Microsoft Visual Basic pro aplikace okno.

2. Dvojklik ThisOutlookSession od Project1 podokno, zkopírujte a vložte pod kód do skriptu.

VBA: Tisk příloh z vybraných e-mailů

Sub BatchPrintAllAttachmentsInMultipleEmails()
'UpdatebyExtendoffice20180417
Dim xFSO As Scripting.FileSystemObject
Dim xTmpFldPath As String
Dim xSelection As Outlook.Selection
Dim xItem As Object
Dim xMailItem As Outlook.MailItem
Dim xAttachments As Outlook.Attachments
Dim xAttachment As Outlook.Attachment
Dim xShell As Object
Dim xTempFolder As Object
Dim xTempFolderItem As Object
Dim xFilePath As String
On Error Resume Next
Set xFSO = CreateObject("Scripting.FileSystemObject")
xTmpFldPath = xFSO.GetSpecialFolder(2).Path & "\Temp for Attachments"
If xFSO.FolderExists(xTmpFldPath) = False Then
    xFSO.CreateFolder xTmpFldPath
End If
Set xSelection = Outlook.Application.ActiveExplorer.Selection
Set xShell = CreateObject("Shell.Application")
Set xTempFolder = xShell.NameSpace(0)
For Each xItem In xSelection
    If xItem.Class = olMail Then
        Set xMailItem = xItem
        If xMailItem.Attachments.Count = 0 Then Exit Sub
        Set xAttachments = xMailItem.Attachments
        For Each xAttachment In xAttachments
            xFilePath = xTmpFldPath & "\" & xAttachment.FileName
            xAttachment.SaveAsFile (xFilePath)
            Set xTempFolderItem = xTempFolder.ParseName(xFilePath)
            xTempFolderItem.InvokeVerbEx ("print")
        Next
    End If
Next

'If xFSO.FolderExists(xTmpFldPath) Then
'    xFSO.DeleteFolder xTmpFldPath, True
'End If
End Sub

příloha k tisku dokumentu 4

3. Pak klikněte na tlačítko Tools > Reference, a v Reference dialog, zkontrolujte Microsoft Scripting Runtime checkbox.
příloha k tisku dokumentu 5   příloha k tisku dokumentu 6

4. cvaknutí OK, Poté stiskněte tlačítko F5 klíč k hromadnému tisku všech příloh ve vybraných e-mailech.

Pozor: Pokud je příloha obrázkem, vyskakuje a Tisk obrázků nejprve klikněte na Tisk přejděte na Uložit výstup tisku jako dialog.
příloha k tisku dokumentu 7

AI Mail Assistant v aplikaci Outlook: Chytřejší odpovědi, jasnější komunikace (kouzlo na jedno kliknutí!) UVOLNIT

Zjednodušte své každodenní úkoly Outlooku pomocí AI Mail Assistant od Kutools pro Outlook. Tento výkonný nástroj se učí z vašich minulých e-mailů, aby nabídl inteligentní a přesné odpovědi, optimalizoval obsah vašich e-mailů a pomohl vám bez námahy navrhovat a upravovat zprávy.
popisovač e-mailu doc ​​ai

Tato funkce podporuje:

  • Chytré odpovědi: Získejte odpovědi vytvořené z vašich minulých konverzací – přizpůsobené, přesné a připravené k použití.
  • Vylepšený obsah: Automaticky upravte text e-mailu tak, aby byl srozumitelný a účinný.
  • Skládání bez námahy: Stačí zadat klíčová slova a nechat AI, aby se postarala o zbytek, s několika styly psaní.
  • Inteligentní rozšíření: Rozšiřte své myšlenky pomocí kontextových návrhů.
  • Shrnutí: Získejte okamžitě stručné přehledy dlouhých e-mailů.
  • Globální dosah: Snadno překládejte své e-maily do jakéhokoli jazyka.

Tato funkce podporuje:

  • Chytré e-mailové odpovědi
  • Optimalizovaný obsah
  • Koncepty založené na klíčových slovech
  • Inteligentní rozšíření obsahu
  • Emailová sumarizace
  • Vícejazyčný překlad

Nejlepší ze všeho je, že tato funkce je zcela uvolnit navždy! Nečekej —stáhněte si AI Mail Assistant nyní a užívejte si!


Nejlepší nástroje pro produktivitu v kanceláři

Nejnovější zprávy: Spuštění Kutools pro Outlook Volná verze!

Vyzkoušejte zcela nové Kutools pro Outlook ZDARMA verze s více než 70 neuvěřitelnými funkcemi, kterou můžete používat NAVŽDY! Kliknutím stáhnete hned!

🤖 Kutools AI : Využívá pokročilou technologii umělé inteligence k snadnému zpracování e-mailů, včetně odpovídání, shrnutí, optimalizace, rozšiřování, překládání a vytváření e-mailů.

???? Automatizace e-mailu: Automatická odpověď (k dispozici pro POP a IMAP)  /  Naplánujte odesílání e-mailů  /  Automatická kopie/skrytá kopie podle pravidel při odesílání e-mailu  /  Automatické přeposílání (pokročilá pravidla)   /  Automatické přidání pozdravu   /  Automaticky rozdělte e-maily pro více příjemců na jednotlivé zprávy ...

📨 Email management: Připomenout e-maily  /  Blokujte podvodné e-maily podle předmětů a dalších  /  Odstranit duplicitní e-maily  /  pokročilé vyhledávání  /  Konsolidovat složky ...

📁 Přílohy ProDávkové uložení  /  Dávkové odpojení  /  Dávková komprese  /  Automaticky uložit   /  Automatické odpojení  /  Automatické komprimování ...

???? Rozhraní Magic: 😊 Více pěkných a skvělých emotikonů   /  Připomeňte si, když přijdou důležité e-maily  /  Minimalizujte aplikaci Outlook namísto zavírání ...

???? Zázraky na jedno kliknutí: Odpovědět všem s příchozími přílohami  /   E-maily proti phishingu  /  🕘Zobrazit časové pásmo odesílatele ...

👩🏼‍🤝‍👩🏻 Kontakty a kalendář: Dávkové přidání kontaktů z vybraných e-mailů  /  Rozdělit skupinu kontaktů na jednotlivé skupiny  /  Odeberte připomenutí narozenin ...

Okamžitě odemkněte Kutools pro Outlook jediným kliknutím –trvale volný. Nečekejte, stáhněte si nyní a zvyšte svou efektivitu!

kutools pro funkce aplikace Outlook1 kutools pro funkce aplikace Outlook2