(847) 796-3177 [email protected]

Outlook can be configured to automatically print attachments from incoming emails. To do that you need to add a script in Outlook by following the instructions below. Once you’ve performed all of these steps, Outlook will automatically print attachments from incoming emails.

  1. Open Outlook and go to Developer tab. Then click the “Visual Basic” button.
    If you don’t have “Developer” tab, go to customize your ribbon/toolbar and add “Developer”
  2. In new window titled “Microsoft Visual Basic for Applications”, double-click “ThisOutlookSession” icon in the tree on left side and paste the following script text into the new window on the right:

    Sub LSPrint(Item As Outlook.MailItem)
    On Error GoTo OError

    ‘detect Temp
    Dim oFS As FileSystemObject
    Dim sTempFolder As String
    Set oFS = New FileSystemObject
    ‘Temporary Folder Path
    sTempFolder = oFS.GetSpecialFolder(TemporaryFolder)

    ‘creates a special temp folder
    cTmpFld = sTempFolder & “\OETMP” & Format(Now, “yyyymmddhhmmss”)
    MkDir (cTmpFld)

    ‘save & print
    Dim oAtt As Attachment
    For Each oAtt In Item.Attachments
    FileName = oAtt.FileName
    FullFile = cTmpFld & “\” & FileName

    ‘save attachment
    oAtt.SaveAsFile (FullFile)

    ‘prints attachment
    Set objShell = CreateObject(“Shell.Application”)
    Set objFolder = objShell.NameSpace(0)
    Set objFolderItem = objFolder.ParseName(FullFile)
    objFolderItem.InvokeVerbEx (“print”)

    Next oAtt

    ‘Cleanup
    If Not oFS Is Nothing Then Set oFS = Nothing
    If Not objFolder Is Nothing Then Set objFolder = Nothing
    If Not objFolderItem Is Nothing Then Set objFolderItem = Nothing
    If Not objShell Is Nothing Then Set objShell = Nothing

    OError:
    If Err <> 0 Then
    MsgBox Err.Number & ” – ” & Err.Description
    Err.Clear
    End If
    Exit Sub

    End Sub

  3. Go to menu Tools > References and add a reference to “Microsoft Scripting Runtime”. Click OK button to close References window.
  4. Hit Save icon on top toolbar and close Visual Basic window.
  5. Create a rule in Outlook for all incoming messages from a certain person (or from who you receive those attachments) and choose run a script action.

Outlook will now automatically print attachments of incoming emails automatically. If you’re looking for an easier paid solution, please look at the Print Tools Add-In by MAPI lab.

ATYXIT is a Chicagoland based IT Provider with a focus on Cybersecurity and Managed IT Services. Looking for help with technology in your business? Contact us today for a free network assessment and security audit.

Subscribe To Our Newsletter

Subscribe To Our Newsletter

Join our mailing list to receive monthly IT news, updates, and security tips from our team.

You have Successfully Subscribed!