Outlook에서 PDF 첨부 파일을 일괄 인쇄
이 기사는 데이터웨어 하우징 전문가 인 Sean Tsai와 How-To Geek의 좋은 친구가 작성했습니다.
Outlook 전자 메일 상자에받은 모든 첨부 파일을 인쇄하고 싶습니까? 예를 들어 무료 팩스를 PDF 이메일 서비스에 가입하고 예전 팩스 기기처럼 자동으로 인쇄하기를 원한다고 가정 해 보겠습니다..
VB (매크로) 프로그래밍에 익숙하다면이를 달성하는 빠른 방법이 있습니다..
여기서 보여주는 것은 Outlook에서 규칙을 만들고 들어오는 팩스 전자 메일을 별도의 하위 폴더로 이동하는 것입니다. VB 코드를 사용하여 하위 폴더의 모든 전자 메일에 대해 인쇄 작업을 실행하기위한 매크로를 만듭니다. 따라서 전자 메일을 열어 첨부 파일을 하나씩 인쇄 할 필요가 없습니다..
1 단계
Outlook의 "Mailbox - YourName"아래에 "Batch Prints"라는 하위 폴더를 만듭니다..
2 단계
다음과 같이 Outlook에서 도구 / 규칙 및 알림 메뉴의 규칙을 만듭니다.
"[email protected]"필드에 팩스 공급 업체의 이메일 주소를 입력하십시오. 제목 줄에는 매번 팩스 공급 업체에서 보내는 영구 텍스트를 넣으십시오 (주기적으로 변경되는 텍스트는 넣지 마십시오). 3rd "배치 인쇄물"필드는 첫 번째 단계에서 방금 작성한 하위 폴더입니다.
3 단계
VB 매크로를 만듭니다. 먼저 도구 / 매크로 / Visual Basic 편집기로 이동하여 VB 편집기를 표시합니다. VB 편집기가 다음과 같이 보일 것입니다.
4 단계
왼쪽 프로젝트 창에서 Project1 항목을 마우스 오른쪽 단추로 클릭하고 Module1이라는 모듈을 삽입합니다.
5 단계
Module1이 작성되면 아래 코드를 글 머리 기호 # 3과 같이 오른쪽 창에 복사하십시오.
Public 하위 PrintAttachments () MAPIFolder로 희미한받은 편지함 MailItem으로 희미한 항목 Dim Attmment로 Dim Atmt Dim로 파일 이름 Dim String In i As Inbox = GetNamespace ( "MAPI"). GetDefaultFolder (olFolderInbox) .Parent.Folders.Item ( "Batch Prints" ) Inbox의 각 항목 For Each Atmt의 항목 Item.Attachments의 모든 첨부 파일은 먼저 임시 폴더 C : \ Temp에 저장됩니다. 이 폴더를 만들어야합니다. Acrobat Reader가 C : \ Program Files \ Adobe \ Reader 8.0에 설치되어 있지 않으면 FileName = "C : \ Temp \"& Atmt.FileName Atmt.SaveAsFile FileName ' Reader \ acrord32.exe ""/ h / p "" "+ FileName +" "" ", vbHide 다음 Item.Delete '전자 메일을 자동으로 삭제하지 않으려면이 줄을 제거하십시오. 다음 Set Inbox = Nothing End Sub
시스템의 경로와 일치하도록 Acrobat을 호출하는 코드 행을 변경해야 할 수도 있습니다.
6 단계
이제 설치가 완료되었습니다. 팩스 공급 업체의 모든 전자 메일은 들어올 때 일괄 인쇄물로 이동합니다.이 예에서 모든 첨부 파일이 PDF 형식으로 제공되기를 기대하기 때문에 Acrobat acrord32.exe를 사용하여 모든 첨부 파일을 인쇄합니다.
매크로 사용
이제 모든 첨부 파일을 인쇄하려면 매크로로 가서 PrintAttachments 매크로를 실행하면 모든 첨부 파일이 순차적으로 인쇄됩니다. 이메일이 일단 삭제되면 삭제되고 휴지통으로 옮겨집니다..
참고 : 인쇄물은 기본 프린터로 보내 지므로 올바른 프린터 드라이버가 설치되고 선택되었는지 확인해야합니다.
희망이 유용합니다!
