VBA를 통한 이미지 삽입 (저장할 수 있는!)
VBA를 통해서 이미지 삽입 시, 많이 사용하는 LoadPicture를 사용한다.
하지만 해당 LoadPicture()를 사용할 경우, 2010 버전 이후에서는 이미지Link가 되고,
파일 저장 시, 이미지가 함께 저장되지 않는다.
그래서 다른 사람들에게 전달하거나 정리하기에는 알맞지 않은 함수;;
그래서 다른 함수를 찾은 것이 AddPicture 함수가 있다.
해당 함수를 사용하면 이미지를 호출하고 저장할 수 있다.
용법:
Shapes.AddPicture(파일명, 파일연결 여부 , 그림을 문서와 저장 여부
, X좌표 , Y좌표, 이미지 높이, 이미지 넓이)
실제 사용 시.
dim r위치
set r위치 = Range("Sheet1!A1")
iLeft = r위치.Left
iTop = r위치.Top
Set s = Worksheets(sSheetName).Shapes.AddPicture(sFileName, False, True, iLeft, iTop, 51, 51)
시트1에 A1위치에 이미지를 삽입하는 방법이다.
'학습 > 엑셀 VBA' 카테고리의 다른 글
VBA에서 현재 보고 싶은 시트를 확인할 때. (0) | 2014.02.08 |
---|---|
엑셀 VBA 폴더 여부 확인 (0) | 2012.11.15 |
엑셀 VBA 속도 향상! (서식계산 옵션 VBA로 변경하기) (0) | 2011.12.23 |
엑셀 오늘 날짜 기록 (0) | 2011.07.13 |
엑셀 셀 서식이 많습니다.!! (6) | 2011.06.28 |