'엑셀 객체 삽입'에 해당되는 글 2건

  1. 2023.04.26 :: 엑셀 PDF 삽입
  2. 2023.04.22 :: 엑셀파일에 PDF 파일 일괄 첨부(객체 삽입)
컴퓨터/파일, 엑셀 2023. 4. 26. 19:05

안녕하세요, 업무를 하는데 PDF 삽입 못하시는 분들이 은근 많으시더라고요 !!

그래서 빠르게 PDF 삽입하는 방법에 대해서 알려드리겠습니다.

아래와 같이 고민하지 마세요 간단합니다!!!!

작업 전 엑셀파일

위와 같이 엑셀표가 있고 여기에 첨부파일을 삽입하는 작업을 할 거에요.
간단합니다.

삽입 - 개체

 *단축키: Alt N J J

 *엑셀창 열려있는 상태에서 위의 단축키 입력 시 개체삽입이 똑같이 열립니다.

개체 삽입(1/3)
개체 삽입(2/3)

기본적으로는 개체 삽입 시 삽입된 파일과 원본 파일이 연결되지 않는데 조건에 따라 나누어 집니다.

1. ★파일에 연결★ 선택 시 원본파일과 연결되며 첨부된 파일 수정 시에 같이 개체 삽입해서

    Open 한 파일 내용이 수정되어 있습니다.

2. 여기서 아이콘으로 표시 선택 시 파일 그대로 이미지로 가져옵니다.

개체 삽입(3/3)

위와 같이 삽입이 완료되었습니다.

PDF는 물론, Excel(엑셀), Word(워드), ppt(파워포인트), 그림(Jpg, PNG) txt(텍스트파일) 등

모든 파일 다 삽입이 가능 하니까 참고 하시면 됩니다.!!

삽입된 파일 실행 방법은 해당 파일 더블클릭 하시면 됩니다.

 

이상 하나씩 PDF 파일 삽입(첨부) 하는 방법이었습니다.

 

근데 여기서 삽입해야 할 파일이 엄청 많다!!?!?!??

아래의 포스팅 참고하시면 도움이 되실거 같아요!!!

한번에 여러개 첨부하는 방법도 있습니다.

 

엑셀파일에 PDF 파일 일괄 첨부(객체 삽입)

 

엑셀파일에 PDF 파일 일괄 첨부(객체 삽입)

안녕하세요, 파일 정리 하는데 엑셀파일을 사용하다 보면 객체 삽입 하는 경우가 은근 많더라고요 근데 아래와 같이 파일이 너무 많아요.... 이걸 언제 하나하나 첨부합니까. 그래서 일괄 PDF 객

sppechless.tistory.com

감사합니다.

posted by 취미찾는중
:
컴퓨터/파일, 엑셀 2023. 4. 22. 19:42

안녕하세요, 파일 정리 하는데 엑셀파일을 사용하다 보면 객체 삽입 하는 경우가 은근 많더라고요

근데 아래와 같이 파일이 너무 많아요.... 이걸 언제 하나하나 첨부합니까. 그래서

일괄 PDF 객체 삽입 하는 것을 포스팅 하려고 합니다! 

오늘 정리작업 할 내용:

 

1. 파일명 추출 후 엑셀에 구분 저장

2. 객체 삽입 일괄 적용(PDF)

수많은 PDF 파일....

 

 

우선 폴더 내 수많은 파일을 불러와서 엑셀파일에 불러올게요.

일일이 직접 기입하는 분은 없으시죠 ^^?

1. CMD 실행 후 cd 경로 Enter.

  * ex) cd C:\Users\Jung\Desktop\임시\User\매출전표_2\

2. dir/b 입력

cmd 작업

출력된 부분 드래그 후 복사

 

3. 엑셀파일에 붙여넣기

엑셀파일 작업_시작

데이터 가공 작업 시작

데이터 Tab - 텍스트나누기 Click

 

엑셀파일 작업_텍스트나누기_(1/3)
엑셀파일 작업_텍스트나누기(2/3)

 

 

엑셀파일 작업_텍스트나누기(3/3)

위와 같이 텍스트 나누기 후 필요없는 부분 지워야겠죠!? 

저는 " _ " 부분과 ".pdf" 부분이 필요 없어서 지울거에요

1. 찾기/바꾸기(Ctrl+H) → 찾기: .pdf  /   바꾸기:  공백상태 그대로(아무것도 입력 안할것)

  * " _ " 부분도 동일하게 진행

엑셀파일 작업_찾기/바꾸기

2. VBA 언어(매크로) 코드 입력(코드 복사/붙여넣기)

  * 2-1 엑셀창에서 Alt + F11

  * 2-2 열린 창에서 삽입 - 모듈 Click

매크로 입력_(1/3)
매크로 입력_(2/3)

Sub InsertPDFs()
    Dim MyPath As String, MyFile As String
    Dim i As Integer
    
    'PDF 파일이 있는 폴더 경로 설정, 아래 " " 부분 안에 내용(경로)는 사용자에 맞게 변경하세요.
    MyPath = "C:\Users\Jung\Desktop\임시\User\매출전표_2\"
    
    'PDF 파일 개수만큼 반복
    MyFile = Dir(MyPath & "*.pdf")
    i = 2
    Do While Len(MyFile) > 0
        'PDF 파일 삽입
        ActiveSheet.OLEObjects.Add(Filename:=MyPath & MyFile, Link:=False, DisplayAsIcon:=False, Left:=0, Top:=i * 15, Width:=100, Height:=100).Select
        
        '다음 파일로 이동
        i = i + 1
        MyFile = Dir
    Loop
End Sub

 

 

위의 값 붙여넣기 후 키보드 F5 누르시면 아래와 같이 PDF 파일들이 한꺼번에 잘 첨부되는 모습을 볼 수 있습니다!!!!!

매크로 입력(3/3)

짜잔!!! 한 번에 지정된 폴더(경로) 내에 모든 PDF 파일 일괄첨부 였습니다!!!

 

아래 게시글은 PDF 파일 일괄첨부 후에 깔끔하게 정리하는 방법 입니다.

글이 길게 작성되어서 나누어서 게시하였습니다.

객체 삽입 파일 깔끔하게 정리

 

객체 삽입 파일 깔끔하게 정리

안녕하세요, 엑셀파일에 PDF 파일 일괄 첨부 후에 깔끔하게 정리하는 것도 정리해봤어요. 엑셀파일에 PDF 파일 일괄 첨부(객체 삽입) 엑셀파일에 PDF 파일 일괄 첨부(객체 삽입) 안녕하세요, 파일

sppechless.tistory.com

 

감사합니다.

'컴퓨터 > 파일, 엑셀' 카테고리의 다른 글

엑셀 셀 강조  (0) 2023.05.05
엑셀 PDF 삽입  (0) 2023.04.26
객체 삽입 파일 깔끔하게 정리  (0) 2023.04.23
파일명 추출 및 목록 저장_2(파일명 수정 포함)  (0) 2023.04.22
posted by 취미찾는중
: