Outlook에서 Excel로 이메일 본문 테이블을 내보내는 방법은 무엇입니까?
본문에 일부 테이블이 포함 된 전자 메일을 받으면 메시지 본문의 모든 테이블을 Excel 워크 시트로 내 보내야 할 수 있습니다. 일반적으로 테이블을 복사하여 워크 시트에 붙여 넣을 수 있지만 여기서는 내 보내야하는 테이블이 여러 개있을 때이 작업을 해결하는 유용한 방법에 대해 설명합니다.
Outlook 메시지 본문의 모든 테이블을 VBA 코드를 사용하여 Excel 워크 시트로 내보내기
Outlook 메시지 본문의 모든 테이블을 VBA 코드를 사용하여 Excel 워크 시트로 내보내기
하나의 메시지 본문에서 Excel 워크 시트로 모든 테이블을 내보내려면 다음 VBA 코드를 적용하십시오.
1. 테이블을 내보낼 메시지를 연 다음 ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.
2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 다음 코드를 모듈 창.
VBA 코드 : 메시지 본문의 모든 테이블을 Excel 워크 시트로 내 보냅니다.
Sub ImportTableToExcel()
Dim xMailItem As MailItem
Dim xTable As Word.Table
Dim xDoc As Word.Document
Dim xExcel As Excel.Application
Dim xWb As Workbook
Dim xWs As Worksheet
Dim I As Integer
Dim xRow As Integer
On Error Resume Next
Set xExcel = New Excel.Application
Set xWb = xExcel.Workbooks.Add
xExcel.Visible = True
Set xWs = xWb.Sheets(1)
xRow = 1
For Each xMailItem In Application.ActiveExplorer.Selection
Set xDoc = xMailItem.GetInspector.WordEditor
For I = 1 To xDoc.Tables.Count
Set xTable = xDoc.Tables(I)
xTable.Range.Copy
xWs.Paste
xRow = xRow + xTable.Rows.Count + 1
xWs.Range("A" & CStr(xRow)).Select
Next
Next
End Sub
3. 위의 코드를 붙여 넣은 후에도 여전히 응용 프로그램 용 Microsoft Visual Basic 창을 클릭합니다 도구 > 참고자료 로 이동합니다 참조 -Project1 대화 상자 및 확인 Microsoft Word 개체 라이브러리 과 Microsoft Excel 개체 라이브러리 옵션에서 사용 가능한 참조 목록 상자, 스크린 샷 참조 :
4. 그런 다음 OK 버튼을 눌러 대화 상자를 종료하고 이제 F5 코드를 실행하려면 다음 스크린 샷과 같이 메시지 본문의 모든 테이블을 새 통합 문서로 내보냈습니다.
최고의 사무 생산성 도구
Outlook 용 Kutools - 귀하의 전망을 강화하는 100개 이상의 강력한 기능
🤖 AI 메일 도우미: AI 마법이 적용된 즉각적인 전문가 이메일 - 원클릭으로 천재적인 답변, 완벽한 어조, 다국어 숙달이 가능합니다. 손쉽게 이메일을 변환하세요! ...
📧 이메일 자동화: 부재중(POP 및 IMAP에서 사용 가능) / 이메일 보내기 예약 / 이메일 발송 시 규칙에 따른 자동 참조/숨은참조 / 자동 전달(고급 규칙) / 인사말 자동 추가 / 여러 수신자 이메일을 개별 메시지로 자동 분할 ...
📨 이메일 관리: 이메일을 쉽게 기억할 수 있습니다. / 제목 및 기타 사기 이메일 차단 / 중복 이메일 삭제 / 고급 검색 / 폴더 통합 ...
📁 첨부 파일 프로: 일괄 저장 / 일괄 분리 / 일괄 압축 / 자동 저장 / 자동 분리 / 자동 압축 ...
🌟 인터페이스 매직: 😊더 예쁘고 멋진 이모티콘 / 탭 보기로 Outlook 생산성 향상 / 문을 닫는 대신 전망을 최소화하세요 ...
???? 원클릭 불가사의: 수신 첨부 파일과 함께 전체 회신 / 피싱 방지 이메일 / 🕘발신자의 시간대 표시 ...
👩🏼🤝👩🏻 연락처 및 캘린더: 선택한 이메일에서 연락처 일괄 추가 / 연락처 그룹을 개별 그룹으로 분할 / 생일 알림 제거 ...
이상 100 특징 당신의 탐험을 기다려주세요! 더 알아보려면 여기를 클릭하세요.