셀에 맞게 자동조정되는 엑셀 사진넣기 매크로 사용법

셀크기에 맞게 자동으로 줄여주는 엑셀 사진넣기 매크로 소개

 

예전엔 엑셀이 너무 어렵게만 느껴져서 다른 워드 프로그램만 사용했는데요. 지금은 엑셀의 무궁무진한 기능에 푹 빠져 모든 문서를 엑셀로 제작하고 있습니다. 특히 엑셀의 기능중에 매크로는 여러개의 명령어를 하나의 키입력으로 동작하게 할 수 있어서 활용만 잘하면 문서를 만들때 시간과 노력을 대폭 줄일 수 있는데요.

 

오늘은 셀에 맞게 자동으로 크기를 줄여주는 엑셀 사진넣기 매크로를 소개해 드리겠습니다. 엑셀에서 사진을 불러오면 다시 크기를 줄여서 셀에 맞추는 작업을 하죠. 한두장의 사진이면 크게 상관없지만 제품총람이나 부품 단가표를 만들때 수십장의 사진을 일일이 셀에 맞출려면 꽤 많은 시간이 소요됩니다.

 

이럴때는 엑셀 사진넣기 매크로를 사용하면 셀크기에 맞게 딱 맞쳐서 자동으로 삽입이 가능합니다.

 

아래 엑셀 사진넣기 매크로 사용법으로 시간과 노력을 절약해 보세요.

 

 

 

 

엑셀 매크로 사용법

 

▼ 먼저 원활한 매크로 사용을 위해 엑셀에서 매크로 사용을 허용해 보겠습니다. 엑셀 옵션으로 들어가 주세요.

 

 

 

 

▼ 보안센터에서 "보안센터 설정"으로 들어가 주세요.

 

 

 

 

▼ 매크로 설정에서 "모든 매크로 포함"을 선택후 확인을 눌러주세요.

 

 

 

 

▼ 이제 본격적으로 매크로를 만들어 보겠습니다. 문서를 열어주세요.

 

 

 

 

▼ Alt+F11 단축키를 누르면 비주얼베이직 창이 열립니다.

 

 

 

 

▼ 상단 메뉴 "삽입"에서 "모듈"을 선택해 주세요.

 

 

 

 

▼ 모듈창에 코드를 복사해서 넣어주세요. (메모장을 열면 코드가 있습니다.)

사진넣기 코드.txt

 

 

 

▼ 문서로 돌아와서 사진을 넣을 셀을 선택후 단축키 Alt+F8을 누르면 매크로창이 열립니다. "실행"을 눌러주세요.

 

 

 

 

▼ 사진을 선택후 "열기"를 눌러주세요.

 

 

 

 

▼ 그러면 선택한 셀에 사진이 꽉 차게 자동으로 삽입됩니다.~

 

 

 

 

▼ 매크로창 옵션에서 단축키를 설정하면 좀더 빠르게 사진을 넣을 수 있습니다. ^^

 

 

 

 

이 글을 공유하기

댓글(64)

  • 이전 댓글 더보기
  • 열매
    2018.01.24 17:14

    감사합니다^^ 큰 도움이 되었습니다~

  • 이상한친구
    2018.01.30 09:06

    감사합니다~

  • 김엘디
    2018.02.05 21:01

    혹시 저렇게 사진을 삽입한뒤에 영구삽입은 어떻게 해야되나요??

    • 2018.02.05 21:38 신고

      영구 삽입은 댓글로 설명드리기엔 힘든 부분이 있습니다.ㅜㅜ 조만간 다시 관련 내용 포스팅해보도록 할게요.

  • HJ Jeon
    2018.02.27 19:11

    감사합니다 덕분에 쉽게 작업했어요

  • 잠팅이
    2018.03.08 00:06

    안녕하세요
    작업후 저장을 하려는데

    파일형식 목록에서 메크로 사용파일 형식을 선택해야 저장이 된다는데..
    그게 어디 있는건지 모르겠어요 ㅠㅠ

    • 2018.03.08 21:41 신고

      안녕하세요. ^^ 먼저 엑셀 파일을 저장하기 전에
      비주얼베이직 창에 넣은 메크로를 저장하시면 되세요.~

  • 김유석
    2018.03.08 11:24

    좋은정보 알려주셔서 잘사용하고있습니다.
    한가지 여쭤보고싶은게 표에 넣을거라 해당 셀에 사진을 매크로로 넣으면 사진이 테투리까지 먹어버려서 깔끔하지않게 보시는분이 계시더라구요ㅠㅠ

    해당 셀보다 살짝 작은 사이즈(테두리 먹지않을정도)만 넣는 수식? 을 알수있을까요??

    • 2018.03.08 21:31 신고

      ^^ 생각보다 간단합니다.

      Sub insert_Pic()
      Dim Pic As Variant
      Pic = Application.GetOpenFilename _
      (filefilter:="Picture Files,*.jpg;*.bmp;*.tif;*.gif;*.png")
      If Pic = False Then
      Exit Sub
      End If
      With ActiveSheet.Pictures.Insert(Pic).ShapeRange
      .LockAspectRatio = msoFalse
      .Height = Selection.Height -4
      .Width = Selection.Width -4
      .Left = Selection.Left -4
      .Top = Selection.Top -4
      End With
      End Sub

      이런식으로 뒷부분에 -숫자를 넣어주면 그만큼 여백이 생깁니다.

      안되시면 다시 문의주세요.~

  • 왕초보
    2018.04.05 12:07

    유용한 자료 였습니다. 덕분에 큰 도움 되었습니다.

  • 와~~~앙 초보
    2018.05.11 13:32

    완전완전 감사감사요~~!!!!
    도움 마니되었어요~~~

  • 이준
    2018.06.11 21:46

    이거 사진이 회전되서 드가는데 회전방향 조절 같은건 못하나요?ㅜㅜ

    • 2018.06.13 11:34 신고

      아쉽지만 회전 기능은 없습니다. 미리 사진 넣기전에 대량으로 사진 회전하는 툴로 변형후 넣으시면 될것 같아요.

  • 2018.06.23 14:19

    저장 하려고 하는데 매크로 까지 저장이 안되는데 ㅠㅠ 초보라서 그런데 순서좀 알려 주실수 있나요?

    • 2018.06.23 21:32 신고

      ^^ 설명드린 방법중에 막히는 부분을 꼭 집어주시면 상세히 설명드릴게요.

  • 엑셀초보
    2018.07.04 11:33

    안녕하세요 매크로 실행하면 msoFalse 부분에서 수식어가 잘못 되었다고합니다. 해결 방법좀 알려주실수 있을까요??

    • 2018.07.05 21:46 신고

      흠 정확하게 코드를 삽입하셨다면 저로써도 어떤 문제인지 알 수 없습니다. 혹시 지금 사용하시는 버전은 어떤건지 알 수 있을까요?

  • 김다원
    2018.09.04 18:50

    ㅠㅠ안녕하세요 올려주신 내용으로 동일하게 따라했는데

    매크로 창에서 SUB INSECT_PIC()
    이부분이 노란색으로 표시되면서

    컴파일 오류입니다:구문 오류입니다.

    이렇게 뜨는데...어떻게 해야할까요ㅠㅠ?

    • 2018.09.06 21:29 신고

      흠 문구 어느부분이 틀린것 같은데요. 그대로 복사하셨는데 그런건가요?

  • 이승준
    2018.09.14 10:19

    저도 저장을 하려는데... 메크로로 인하여 저장이 안된다고하네요... 비주얼베이직창에서도 저장을했는데 그또한 메크로로 인하여 저장이안된다고합니다.ㅠㅠ 어떻게해야될까요

    • konahn
      2018.12.13 16:59

      삽입한 매크로를 지우고 저장하세요.
      매크로 포함하려면 .xlsm 확장자로 저장하시구요.

  • 2018.12.13 00:23

    비밀댓글입니다

  • 수지니
    2018.12.21 11:58

    자세하게 설명이 되어있어 이제부턴 유용하게 사용할수 있을거 같아요..
    감사합니다.

  • 히어로2
    2019.01.28 15:25

    감사합니다..너무 좋네요

  • 김조교
    2019.02.21 16:33

    대학조교입니다! 학생들 사진출석부 만들 때 정말 유용하게 사용하고 있습니다. 깔끔하게 자세히 잘 설명해주셔서 감사해요 ㅠㅠㅠ

  • 임보춘
    2019.07.30 14:47

    잘봤습니다~~ 근데 사진이 자동으로 크기가 조절되어서 찌그러지는데 비율까지 되서 사진넣기는 안되나요????ㅠㅠㅠㅠㅠㅠㅠㅠㅠ

    • 2019.08.04 21:04 신고

      에공 그것 까지는 어렵습니다. 어느정도 사진 비율이 비슷한 사진을 준비하거나 일괄 수정하는 걸 추천드려요. 사진 크기을 일괄 수정하는 프로그램 하나 추천드릴게요. 포토스케이프를 사용하시면 사진 크기와 비율을 한번에 수정가능합니다.

  • 네박자
    2019.09.04 11:25

    사진이 꺼꾸로 박혀요
    부탁드립니다.

    • 2019.09.05 09:21 신고

      흠...사진이 거꾸로 되어 있는게 아닐까요? 포토스케이프 프로그램을 이용하면 모든 사진을 일괄 편집하실 수 있습니다. 먼저 뒤집은 후 사용해 보세요.

  • 네박자
    2019.09.06 20:02

    카톡사진을 pc에 저장해서 사용하는데, 잘되다가 어느때는 사진이 옆으로 누워 찍혀요
    아! 우우 사람 돌아버립니다. 어떤때는 또 잘 들어갑니다.
    낼 모레 결재해야 되는데, 선생님! 부탁드립니다.
    시간두 없구, 물어볼 곳도 없구요.
    부탁드릴께요
    뭐, 이런게 첨이라 드릴것두 없구 죄송해요.

    • 2019.09.06 23:34 신고

      에공... 사진이 옆으로 90도로 눕혀진건 각도를 변경해야 합니다. 윈도우에서 사진에 마우스 우클릭 후 오른쪽으로 회전 또는 왼쪽으로 회전으로 방향을 전환한 후 넣어 보세요.

Designed by JB FACTORY