엑셀 VBA로 이미지 파일 읽어서 붙이기!!!
학습/엑셀 VBA2011. 6. 8. 12:29
336x280(권장), 300x250(권장), 250x250, 200x200 크기의 광고 코드만 넣을 수 있습니다.
엑셀로 이미지 파일을 관리하기 위해서
새로운 이미지를 불러올 필요가 있다.
이 때에는 아래와 같은 VBA 함수를 이용할 수 있다.. >ㅁ<b
Dim picTemp
Dim sPicPath
Set picTemp = ActiveSheet.Pictures.Insert(sPicPath)
위와 같이 실행하면 현재 위치하는 셀에 이미지가 들어간다!!!
아..만약 현재 셀에 딱 맞게 이미지를 넣고 싶다면, 아래의 코드를 추가하자.
현재 자신의 셀 크기에 맞게 이미지를 수정해 주는 것이다.
picTemp.Width = ActiveCell.Width - 2
picTemp.Height =ActiveCell.Height - 2
picTemp.Top = ActiveCell.Top + 1
picTemp.Left = ActiveCell.Left + 1
-추가 내용-
이렇게 하면 계속 Picture가 추가되어서 문제 될 수 있다.
이럴 때엔 그림을 한 번에 날려줄 수 있는 코드가 있다!
ActiveSheet.Pictures.Delete
모두 다 날리니깐... 주의하자!
'학습 > 엑셀 VBA' 카테고리의 다른 글
엑셀 오늘 날짜 기록 (0) | 2011.07.13 |
---|---|
엑셀 셀 서식이 많습니다.!! (6) | 2011.06.28 |
엑셀 VBA를 이용해서 다른 프로그램 실행시키기 (3) | 2011.05.16 |
[엑셀]VBA를 이용해서 Text 파일 읽기 (UTF-8 파일 읽기) (0) | 2011.05.12 |
[엑셀 VBA] ASCII 코드 목록 (0) | 2011.05.06 |
댓글()