엑셀스 (www.xls.co.kr) 블로그에 오신것을 환영합니다^---^ 엑셀스 (www.xls.co.kr)
안녕하세요. 엑셀전문 학습사이트 엑셀스 입니다.
: 미디어 : 방명록 : 관리자 : 글쓰기
보이기/숨기기 가능합니다^^
분류 전체보기 (219)
유머(Picture) (35)
의견(Opinion) (9)
엑셀함수 (40)
엑셀메뉴 (67)
엑셀추가기능 (14)
엑셀VBA (53)
챠트를 그림파일로 저장하기
엑셀VBA | 2008/05/22 21:48




다음 코드는 현재 선택된 챠트를 바로 gif 파일로 저장해버립니다.

Sub SaveChartAsGIF ()
  Fname = ThisWorkbook.Path & "\" & ActiveChart.Name & ".gif"
  ActiveChart.Export FileName:=Fname, FilterName:="GIF"
End Sub
 
또는
 
Set CurrentChart = Sheets("Sheet1").ChartObjects(1).Chart
Fname = ThisWorkbook.Path & "\Mychart.gif"
CurrentChart.Export Filename:=Fname, FilterName:="GIF"
Trackback 0 : Comment 1
위로
이전 페이지 다음 페이지
보이기/숨기기 가능합니다^^
nhuk is kuhn 2009
vocalise's me2DAY 2009
vocalise's me2DAY 2009
chung's me2DAY 2009
RSSFeed