홈 · 개발 참고자료

개발 참고자료

[파워빌더][엑셀] 엑셀파일에 이미지 삽입하기...

작성자
관리자
작성일
2017-09-19
조회
9285
분류
파워빌더
//오브젝트 선언


OLEObject export_object




//오브젝트 생성


export_object = Create OLEObject


ret = export_object.ConnectToNewObject( "Excel.Application" )




//엑셀 파일오픈


export_object.Application.Workbooks.Open('c:\test.xls')
export_object.Application.Visible = True
export_object.Worksheets[1].Activate;




//이미지를 등록 해주고 select해서 선택되도록 한다.


export_object.Worksheets(1).Pictures.Insert("C:\hyukworld.jpg").select



//선택된 이미지 위치 조정
export_object.Selection.ShapeRange.IncrementTop(10);
export_object.Selection.ShapeRange.IncrementLeft(200);




//비율로 조정 true면 원래크기의 비율로서 조정됨 false 이면 원하는 크기로 변경가능함.


export_object.Selection.ShapeRange.LockAspectRatio = false




//선택된 이미지 크기 조정
export_object.Selection.ShapeRange.Height = 800
export_object.Selection.ShapeRange.Width = 1000




//연결종료


export_object.DisConnectObject()




//오브젝트 제거


Destroy export_object