try
Exl := CreateOleObject('Excel.Application');
except
MessageDlg('Excel이 설치되어 있지 않습니다.', MtWarning, [mbok], 0);
Exit;
end;
exl.WorkBooks.Open('c:usc편성표.xls'); //파일열기
exl.Sheets['MBC'].select; //연 파일중 원하는 시트 불러오기
exl.Range['D8:D10'].interior.Color := RGB(192,192,192); //Color 회색
exl.Range['G150:G152'].interior.Color := RGB(100,100,100); //Color 진한회색
exl.Range['L150:L152'].interior.Color := $00FF8080; // Color 노랑색
exl.cells(100, 6).interior.Color := $00FF8080; // //Color보라색
//exl.Sheets['MBC'].print; 않됨
//exl.print; 않됨
exl.Visible := True;
이렇게 했는데요 출력이 않되네요
어떻게 하면 출력이 되나요?
> try
> Exl := CreateOleObject('Excel.Application');
> except
> MessageDlg('Excel이 설치되어 있지 않습니다.', MtWarning, [mbok], 0);
> Exit;
> end;
> exl.WorkBooks.Open('c:usc편성표.xls'); //파일열기
> exl.Sheets['MBC'].select; //연 파일중 원하는 시트 불러오기
> exl.Range['D8:D10'].interior.Color := RGB(192,192,192); //Color 회색
> exl.Range['G150:G152'].interior.Color := RGB(100,100,100); //Color 진한회색
> exl.Range['L150:L152'].interior.Color := $00FF8080; // Color 노랑색
> exl.cells(100, 6).interior.Color := $00FF8080; // //Color보라색
> //exl.Sheets['MBC'].print; 않됨
> //exl.print; 않됨
> exl.Visible := True;
>
> 이렇게 했는데요 출력이 않되네요
> 어떻게 하면 출력이 되나요?
안녕하세요. 상쾌한 아칩입니다. ^^;
print 메소드 대신에 printout 을 쓰면 됩니다.