엑셀 작업 효율 200%! 사진을 셀 안에 자동으로 완벽 정렬하는 VBA 매크로

 

사진을 셀 안에 자동으로 완벽 정렬하는 VBA 매크로

엑셀 작업 효율 200%! 사진을 셀 안에 자동으로 완벽 정렬하는 VBA 매크로

 서론: 수많은 사진 삽입 작업, 혹시 아직도 수동으로 하시나요?

엑셀로 재고 목록, 제품 카탈로그, 포트폴리오 등을 만들 때, 셀 안에 사진을 삽입하고 셀 크기에 맞게 일일이 크기를 조절하고 위치를 맞추는 반복 작업 때문에 많은 시간을 허비하신 적 있으실 겁니다. 몇 장 안 되는 사진이라면 괜찮지만, 수십, 수백 장이 넘어가면 그야말로 '노가다'가 따로 없죠.

하지만 엑셀 VBA(Visual Basic for Applications) 매크로를 사용하면 이 지루하고 시간을 잡아먹는 과정을 클릭 한 번으로 자동화할 수 있습니다. 오늘은 엑셀 작업 속도를 획기적으로 높여줄, 사진을 셀 안에 자동으로 정렬하는 마법의 매크로 코드를 알려드리겠습니다.


1단계: 개발 도구 탭 활성화 및 VBA 편집기 열기

매크로를 사용하려면 먼저 엑셀에 '개발 도구' 탭이 활성화되어 있어야 합니다.

  1. [파일] [옵션]  [리본 사용자 지정]으로 이동합니다.

  2. 오른쪽 '주요 탭' 목록에서 [개발 도구] 체크박스를 선택하고 [확인]을 누릅니다.

  3. 활성화된 [개발 도구] 탭에서 [Visual Basic]을 클릭하여 VBA 편집기(창)를 엽니다. (단축키: )


2단계: 자동 정렬 매크로 코드 삽입하기

VBA 편집기가 열리면, 이 매크로 코드가 모든 엑셀 파일에서 사용될 수 있도록 '개인용 매크로 통합 문서'에 저장하는 것을 추천합니다.

  1. VBA 편집기의 왼쪽 '프로젝트 탐색기' 창에서 VBAProject (개인용 매크로 통합 문서)를 찾습니다.

    • 만약 이 항목이 보이지 않는다면, [보기] [매크로]  [매크로 기록]을 실행한 후 (저장)를 누르고 기록 중지하면 자동으로 생성됩니다.

  2. VBAProject (개인용 매크로 통합 문서)에서 오른쪽 마우스 버튼 클릭 [삽입]  [모듈]을 선택합니다.

  3. 새로 생성된 모듈 창에 아래의 '사진 자동 정렬' 매크로 코드복사하여 붙여넣기 합니다.

사진 셀 자동 정렬 VBA 매크로 코드 (핵심)


Sub Picture_Auto_Fit_To_Cell()
'
' 선택한 셀 범위 내에 있는 모든 사진을 해당 셀 크기에 맞게 자동 정렬합니다.
'
    Dim shp As Shape
    Dim cell As Range
    
    ' 에러 발생 시 다음 줄로 넘어가게 설정 (사진이 없을 경우 대비)
    On Error Resume Next
    
    ' 현재 선택된 셀을 기준으로 반복합니다.
    For Each cell In Selection
        ' 해당 셀의 범위를 벗어나는 사진들을 찾습니다.
        For Each shp In ActiveSheet.Shapes
            ' 사진의 왼쪽 상단 모서리가 해당 셀 안에 있는지 확인
            If shp.TopLeftCell.Address = cell.Address Then
                
                ' 사진의 크기와 위치를 셀 크기에 맞게 조정
                With shp
                    .LockAspectRatio = msoFalse ' 가로/세로 비율 고정 해제
                    .Left = cell.Left
                    .Top = cell.Top
                    .Width = cell.Width
                    .Height = cell.Height
                    .Placement = xlMoveAndSize ' 셀 이동 및 크기 변경에 따라 같이 움직이도록 설정
                End With
                
            End If
        Next shp
    Next cell
    
    ' 에러 처리 설정 원상 복귀
    On Error GoTo 0
    
    MsgBox "선택된 셀 범위의 사진 정렬이 완료되었습니다.", vbInformation

End Sub

3단계: 매크로 실행 및 사용법

코드를 저장했다면 이제 실제 엑셀 시트에서 사용할 차례입니다.

  1. 엑셀 시트로 돌아와서 사진이 삽입된 셀(들)을 마우스로 드래그하여 선택합니다. (예: A1 셀, 또는 $\text{A1}$부터 A5 셀까지)

  2. [개발 도구] [매크로]를 클릭합니다. (단축키: )

  3. 목록에서 방금 저장한 Picture_Auto_Fit_To_Cell을 찾아 선택하고 [실행] 버튼을 누릅니다.

  4. 잠시 후, 선택했던 셀 안에 모든 사진이 셀 크기에 딱 맞게 자동으로 정렬된 것을 확인하실 수 있습니다!

꿀팁: 매크로 버튼 만들기 (선택 사항)

자주 사용하는 매크로라면, 빠른 실행 도구 모음이나 별도의 버튼을 만들어 등록하면 더욱 편리합니다.

  • 빠른 실행 도구 모음: 엑셀 상단 [빠른 실행 도구 모음 사용자 지정] [기타 명령]  [매크로]를 선택하여 원하는 매크로를 추가합니다.


결론: 자동화로 얻는 시간과 효율

이 '사진 셀 자동 정렬 매크로'를 활용하면 수백 장의 사진을 처리하는 데 걸리던 시간이 단 몇 초로 단축됩니다. 엑셀을 단순한 표 계산 도구가 아닌 강력한 자동화 도구로 활용하여, 단순 반복 작업은 컴퓨터에게 맡기고 여러분은 더 가치 있는 일에 시간을 투자하세요! VBA는 업무 효율을 높이는 최고의 무기입니다.

이 정보가 여러분의 칼퇴에 도움이 되었기를 바랍니다! 다음에는 더 유용한 엑셀 자동화 팁으로 찾아뵙겠습니다. 감사합니다.


#핵심 키워드

#엑셀매크로 #VBA #엑셀사진정렬 #엑셀자동화 #업무자동화 #셀크기에맞게사진삽입 #엑셀팁 #업무효율 #엑셀꿀팁 

댓글 쓰기

0 댓글

이 블로그 검색

태그

이미지alt태그 입력