Excel(엑셀) 워크시트의 기능 중에 마우스 커서를 셀 위로 갖다대면 각 셀에 필요한 주석 등을 표시해 주는 메모(Comment)라는 것이 있다. 메모를 작성해 두면 셀의 오른쪽 상단에 빨간색 딱지가 하나 붙어 메모가 표시되어 있음을 보여주게 된다. 보통은 메모에 텍스트 위주의 정보를 입력해서 활용하게 되는데 사실 다양한 형태로 이용할 수 있다.
그 중 하나로 메모에 그림을 입력할 수도 있는데 다음 글을 참조하면 된다.
[Excel] 메모에 그림 넣기, 2007. 7. 27.
이렇게 하면 시각적으로 정보의 폭이나 재미를 넓힐 수 있어 좋다. 하지만, 그림을 여러 개 입력해야 하는 경우에는 상당히 지루한 작업이 되고, 이런 이유 때문에 필요하지만, 사용을 꺼리는 기능이 되기도 한다.
예를 들어, 각 셀에 사람 이름이 들어가 있는 명단이 있고, 각 사람에 대한 사진 파일을 특정 폴더에 정리해 두었다면 간단한 매크로(macro)를 작성하여 이름이 적힌 각 셀 위에 마우스 커서를 갖다대면 간단하게 해당 인물의 사진이 팝업창처럼 나타나도록 할 수 있다.
일단, 아래 그림과 같이 엑셀의 워크시트에 이름이 입력되어져 있고, 사진 파일의 이름은 “이름.png”로 저장되어 있다고 가정한다.
이제 Excel에서 [Alt] + [F11] 키를 눌러 VBA 편집기를 실행한다.
그 다음 왼편 창 상단에서 작업 중인 Excel 파일 이름이 괄호 안에 들어가 있는 VBAProject 항목을 확인하고 [현재 통합 문서]를 더블클릭하여 코드 입력 창을 부른다.
빈 창이 나타나면 위와 같이 코드를 입력한다. 위 그림에 있는 내용은 아래와 같다.
Sub AddPhoto()
For Each cell In Selection
CurrentFolder = ActiveWorkbook.Path
EmployeePhoto = CurrentFolder & "\인물\" & cell.Value & ".png"
With cell.AddComment
.Shape.Fill.UserPicture EmployeePhoto
.Shape.Height = 100
.Shape.Width = 100
End With
Next cell
End Sub
사진 파일을 담은 폴더가 현재 작업 중인 Excel 파일의 바로 아래에 "인물"이라는 이름으로 지정된 경우이다. 사용 환경에 따라 적당하게 수정하면 된다. 확장자도 jpg라면 png를 jpg로 바꾸면 된다. 들여쓰기는 편의상 한 것으로 하지 않아도 되지만, 될 수 있으면 하는 것이 좋고, [Tab] 키를 쓰면 된다. 그림의 크기도 필요에 따라 수정하면 된다.
입력을 마쳤으면 편집기 창을 닫고 Excel 워크시트로 돌아온다. 그 다음, 사진을 넣을 이름 목록을 선택하고, [개발 도구] 메뉴에서 [매크로] 단추를 클릭한다. 만약 리본 메뉴에서 개발 도구 탭이 보이지 않는다면 다음 글을 참고한다.
[Excel 2007] 리본 메뉴에 개발 도구 탭이 보이지 않을 때, 2008. 10. 5.
[Excel 2010] 리본 메뉴에 개발 도구 탭 표시하기, 2010. 5. 1.
매크로 목록에서 방금 작성한 해당 매크로를 선택하고, [실행(R)]을 클릭한다. 그러면 아래 그림과 같이 모든 셀에 각각 메모 표식이 나타나고 마우스 커서를 갖다대면 이름에 맞는 그림이 나타나는 것을 확인할 수 있다.
여러 모로 다양한 경우에 응용할 수 있다.
트랙백 주소 :: http://pakcw.cafe24.com/trackback/1652
댓글을 달아 주세요.