엑셀 데이터 워드로 옮기기 - egsel deiteo wodeulo olmgigi

Question

Excel에서 만든 Chart가 아주 많아 일일이 하나씩 옮기는건 너무 힘들어 한꺼번에 옮길 방법이 없냐는 질문이 왔습니다.

실습 파일 다운로드

엑셀 차트를 워드로 복사.zip

0.03MB

실습 파일은 압축 파일인데, 압축을 해제하면 엑셀 파일과 워드 파일이 있습니다.

엑셀 파일에 VBA 코드가 있고, 워드 파일은 엑셀 차트가 복사될 파일입니다.

꼭 같은 폴더에 있어야 코드가 정상적으로 동작합니다.

파일을 보내지 않아서 예시로 차트 3개를 만들었습니다.

한 시트에 3개 차트를 만들었는데, 여러 개 시트에 있어도 실행하는데는 어려움이 없습니다.

VBA 코드에서 Word 개체를 불러와 사용해야 하므로 Word 개체를 참조로 추가해야 합니다.

VBE를 실행해서 [도구] - [참조]를 실행합니다.

[사용 가능한 참조]에서 'Microsoft Word 16.0 Object Library'를 선택하고 [확인]을 누릅니다.

이제 엑셀에서 워드 개체를 불러와 사용할 수 있습니다.

코드는 내용 그대로 입니다.

Public Sub 차트복사()
    Dim wrdApp As Word.Application
    Dim wrdDoc As Word.document
    
    Set wrdApp = CreateObject("Word.Application")
    Set wrdDoc = wrdApp.documents.Open(ThisWorkbook.Path & "\차트 복사 테스트.docx")
    
    For i = ActiveSheet.ChartObjects.Count To 1 Step -1
        ActiveSheet.ChartObjects(i).Activate
        ActiveChart.ChartArea.Copy
        
        wrdDoc.Content.PasteAndFormat wdChartPicture
        wrdDoc.Content.InsertParagraphAfter
    Next i
    
    wrdDoc.Save
    wrdDoc.Close
End Sub

코드를 작성할 때 문제가 있었는데, 엑셀 차트를 복사해 붙여넣기 하면 나중에 붙여넣은 차트가 워드 파일 앞쪽에 나타나는 것입니다.

엑셀과 달리 복사한 차트를 붙여넣을 위치를 지정하는 방법을 찾을 수 없었습니다.

꽤 오래 검색을 했는데 찾을 수 없어 마지막 차트부터 붙여 넣는 방법으로 문제를 풀었습니다.

엑셀 VBA는 익숙하지만 워드나 파워포인트는 VBA를 쓸 기회가 많이 없어서 아주 단순한 기능도 모르는 경우가 많습니다.

틀림없이 찾아보면 찾을 수 있을텐데 당장은 빨리 문제를 해결하는게 필요하니 다음 기회로 미룹니다.

- MS WORD의 고정된 표에 값 옮기기

아래와 같은 워드 문서(MS WORD Document)가 있다

그리고 아래의 엑셀 데이타가 있다

지금은 단순화를 위해 동일한 표양식에 동일한 데이타를 넣어 두었다

이 엑셀 데이타를 워드의 표로 옮기는 작업을 하는 워드 매크로(WORD VBA)이다

샘플데이타 엑셀 파일과 워드 파일이다

엑셀데이타.xlsx

엑셀데이타옮기기.docm

다음은 실행결과이다

- 테이블 새롭게 만들어(신규 생성해) 추가

- 타이틀만 있는 테이블에 열(Row) 추가

경우에 따라 Excel 파일을 Word 문서로 변환하고 싶을 수 있지만이 작업을 직접 해결하는 데 도움이되는 변환기가 없습니다. 이제 Excel 워크 시트를 워드 문서로 변환하는 몇 가지 편리한 트릭을 알려 드리겠습니다.

복사 및 붙여 넣기로 Excel을 단어로 변환

개체로 삽입하여 Excel을 단어로 변환

복사 및 붙여 넣기로 Excel을 단어로 변환

가장 직접적이고 쉬운 방법은 Excel에서 워크 시트 내용을 복사 한 다음 Word 문서에 붙여 넣는 것입니다.

1. 필요한 Excel 워크 시트를 열고 Word 문서로 변환 할 내용 범위를 선택하고 전체 워크 시트를 변환해야하는 경우 Ctrl + 빠르게 선택하려면 Ctrl + C 그것을 복사하십시오.

2. 빈 Word 문서를 열고 문서에 커서를 놓고 마우스 오른쪽 버튼을 클릭하여 컨텍스트 메뉴를 연 다음 필요한 붙여 넣기 유형을 선택합니다. 붙여 넣기 옵션 부분. 스크린 샷보기 :

주의 사항: 한 번에 하나의 선택 만 복사 할 수 있습니다.

개체로 삽입하여 Excel을 단어로 변환

Excel을 열지 않고 전체 Excel 워크 시트를 Word 문서로 빠르게 변환하려는 경우 Excel 워크 시트를 Word에서 개체로 삽입 할 수 있습니다.

배송 시 요청 사항:

(1) 개체로 삽입하면 한 번에 전체 워크 시트 만 삽입 할 수 있습니다.

(2) 엑셀 워크 북을 객체로 닫을 때 마지막 활성 워크 시트를 삽입합니다.

1. Word 문서를 열고 끼워 넣다 > 목적. 스크린 샷보기 :

2. 그런 다음 목적 대화 상자, 아래 파일로부터 생성 탭을 클릭 한 다음 검색 통합 문서를 선택하려면 다음에서 워크 시트를 삽입해야합니다. 검색 대화.

주의 사항: Microsoft Word에 개체로 삽입하기 전에 통합 문서를 닫으십시오.

3. 클릭 끼워 넣다 > OK 작업을 완료합니다. 이제 선택한 통합 문서의 마지막 활성 워크 시트가 Word 문서에 개체로 삽입되었습니다.

팁: 개체를 마우스 오른쪽 버튼으로 클릭하고 컨텍스트 메뉴에서 원하는 옵션을 선택하여 필요에 따라 개체를 편집하고 서식을 지정할 수 있습니다.

최고의 사무 생산성 도구

Excel용 Kutools는 대부분의 문제를 해결하고 생산성을 80% 증가시킵니다.

재사용: 빠르게 삽입 복잡한 공식, 차트 그리고 이전에 사용한 모든 것; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
셀 / 행 / 열 병합 데이터 손실없이; 셀 내용 분할; 중복 행 / 열 결합... 중복 셀 방지; 범위 비교...
중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
300개 이상의 강력한 기능. Office / Excel 2007-2021 및 365를 지원합니다. 모든 언어를 지원합니다. 기업 또는 조직에서 쉽게 배포할 수 있습니다. 전체 기능은 30일 무료 평가판입니다. 60일 환불 보장.