Q&A
- 엑셀문서열고 선을 그리려면 어떻게...?
델파이를 이제 막 시작한 조건일이라고 합니다
제가 질문하고자하는 것은 다음과 같습니다.
var
Excel, WorkBooks, WorkSheet : OleVariant;
begin
Excel := CreateOLEObject('Excel.Application'); // 엑셀문서 시작!
Excel.WorkBooks.Add;
WorkSheet := Excel.ActiveWorkBook.WorkSheets[1];
WorkSheet.Range['A1', 'Q1'].Borders(xlDiagonalDown).LineStyle := xlNone;
WorkSheet.Range['A1', 'Q1'].Borders(xlDiagonalDown).LineStyle := xlNone;
WorkSheet.Range['A1', 'Q1'].Borders(xlDiagonalUp).LineStyle := xlNone;
WorkSheet.Range['A1', 'Q1'].Borders(xlEdgeLeft).LineStyle := xlContinuous;
WorkSheet.Range['A1', 'Q1'].Weight := xlThin;
WorkSheet.Range['A1', 'Q1'].ColorIndex := xlAutomatic;
보시다 시피 엑셀에서 셀을 선택하여 라인을 그리려고 합니다 그런데 계속
'멤버가 없습니다' 라는 에러 메시지만 내
제가 질문하고자하는 것은 다음과 같습니다.
var
Excel, WorkBooks, WorkSheet : OleVariant;
begin
Excel := CreateOLEObject('Excel.Application'); // 엑셀문서 시작!
Excel.WorkBooks.Add;
WorkSheet := Excel.ActiveWorkBook.WorkSheets[1];
WorkSheet.Range['A1', 'Q1'].Borders(xlDiagonalDown).LineStyle := xlNone;
WorkSheet.Range['A1', 'Q1'].Borders(xlDiagonalDown).LineStyle := xlNone;
WorkSheet.Range['A1', 'Q1'].Borders(xlDiagonalUp).LineStyle := xlNone;
WorkSheet.Range['A1', 'Q1'].Borders(xlEdgeLeft).LineStyle := xlContinuous;
WorkSheet.Range['A1', 'Q1'].Weight := xlThin;
WorkSheet.Range['A1', 'Q1'].ColorIndex := xlAutomatic;
보시다 시피 엑셀에서 셀을 선택하여 라인을 그리려고 합니다 그런데 계속
'멤버가 없습니다' 라는 에러 메시지만 내
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 안희준
- •
- 2000.05.13 01:38
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.05.13 02:42안녕하세요. 최용일입니다. 타이머를 이용하세요. 타이머에서 [오류]창이 떠있는가를 검색해서 떠 있다...
-
- 왕초보 상현입니다용!
- 2000.05.13 01:15
- 0 COMMENTS
- /
- 0 LIKES
-
- 힙합인
- •
- 2000.05.13 01:08
- 2 COMMENTS
- /
- 0 LIKES
-
구창민•2000.05.13 03:16힙합인 wrote: > 안녕하세요 저는 슈퍼 왕초보 델파이하는 사람입니다. > 제가 하드에 저장된 DB자료가 ...
-
어린왕자•2000.05.13 02:40힙합인 wrote: > 안녕하세요 저는 슈퍼 왕초보 델파이하는 사람입니다. > 제가 하드에 저장된 DB자료가 ...
-
- 조건일
- •
- 2000.05.13 00:32
- 1 COMMENTS
- /
- 0 LIKES
델파이를 이제 막 시작한 조건일이라고 합니다 제가 질문하고자하는 것은 다음과 같습니다. var Excel, WorkBooks, WorkSheet : OleVariant; begin Excel := CreateOLEObject('Excel.Application'); // 엑셀문서 시작! Excel.WorkBooks.Ad...-
최석기•2000.05.13 00:46확인해보지 않아서 맞는가 모르겠네요.. 아마 다음과 같이 해야 할꺼 같은데... WorkSheet.Range['A1...
-
- 이창영
- •
- 2000.05.13 00:29
- 4 COMMENTS
- /
- 0 LIKES
-
이재식•2000.05.13 01:21이재식 Wrote : 안녕하세요? 그런경우가 있을 것입니다. 이유는 like '뭐%'가 사실 Ansi SQL임에도 불...
-
이창영•2000.05.13 01:45이재식 wrote: > 이재식 Wrote : > 안녕하세요? > > 그런경우가 있을 것입니다. > 이유는 like '뭐%'...
-
이재식•2000.05.13 18:53> 역시 답변이 빠르군요. 감사! > 하지만 #은 쓸수없군요. 아마도 %만 쓸수있을듯 싶네요. > 제가 몇번해...
-
바보•2000.06.23 00:13> 죄송합니다. 제가 실수를 했군요. #이 아니라 *입니다. > 죄송합니다. 오타가 발생했군요. > 님의 말씀...
-
-
조규춘•2000.05.13 00:44대전왕초보입니다. wrote: > 인덱스가 중복이 되어서들 그렇다고 하는데요.... > 재가 이해가 안되는것은...
-
김•2000.05.13 00:43대전왕초보입니다. wrote: > 인덱스가 중복이 되어서들 그렇다고 하는데요.... > 재가 이해가 안되는것은...
-
-
- 대전왕초보입니다.
- •
- 2000.05.12 22:41
- 1 COMMENTS
- /
- 0 LIKES
-
이은정•2000.05.12 22:54대전왕초보입니다. wrote: > 저는 TABLE를 DATABASE DESKTOP으로 만들었습니다. > 그래서 TABLE이 하드에...
-
- azure
- •
- 2000.05.12 22:38
- 1 COMMENTS
- /
- 0 LIKES
-
이재식•2000.05.13 00:30azure wrote: > 퀵 레포트 중에 QRband나 QRgroup이 포함하고 있는 > DBText나 QRLabel보다 먼저 print ...
-
-
seagod•2000.05.13 00:24sql을 클리어 하면 쿼리 컴포넌트에는 sql문이 없으니 open하면 에러나 나겠지요? 레마 wrote: > 콤...
-
-
- 주희
- •
- 2000.05.13 00:47
- 3 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.05.13 00:57안녕하세요 하얀까마귀 입니다... 어제 휴일은 잘 보내셨는지요.. 후후... 음 말씀하신 내용에서 사...
-
주희•2000.05.13 02:12감사합니다..꾸~벅~~하얀까마귀님.. 알려주신 팁 감사드립니다. > (근데 이경우 데이타셋이 오픈되면 ...
-
하얀까마귀•2000.05.13 03:50안녕하세요 하얀까마귀 입니다... 음.. 우선 changing 에서 어느 텝에서 발생을 하는지를 첵크 하세요.....
-
- saxoji
- 2000.05.12 22:18
- 0 COMMENTS
- /
- 0 LIKES
-
- 최호인
- •
- 2000.05.12 21:55
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.05.13 01:09안녕하세요 하얀까마귀 입니다.. 이것도 몇번 답변한것 같은데.... 지로용지의 경우에 A3용지 크기의...
-
-
최용일•2000.05.12 22:26안녕하세요. 최용일입니다. Tab 키와 같은 다이얼로그키는 Key이벤트에서 잡히지 않습니다. 14543번 ...
-
-
- 고보강
- •
- 2000.05.12 21:52
- 1 COMMENTS
- /
- 0 LIKES
-
이재식•2000.05.12 21:56고보강 wrote: > BDE를 사용한 로컬DB가 있습니다. 작업을 하다 비정상적으로 프로그램이 다운되었을때 작...
-
- 델초보...
- •
- 2000.05.12 21:32
- 1 COMMENTS
- /
- 0 LIKES
-
강민주•2000.05.12 22:41델초보... wrote: > STringGrid에서 문자열이 길경우 제한을 주고 '...'으로 대체할라구 하는데 > 어떻게...
-
- 이은정
- 2000.05.12 21:22
- 0 COMMENTS
- /
- 0 LIKES
-
- heimdal
- •
- 2000.05.12 21:20
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.05.13 01:33안녕하세요 하얀까마귀 입니다.. 음.. 이거 설명하자면 쬐끔 길어질것 같네요... 간단하게 설명할께...
-
- 상현이라는 초보입니
- •
- 2000.05.12 21:26
- 2 COMMENTS
- /
- 0 LIKES
-
한창희•2000.05.14 13:41상현이라는 초보입니다. wrote: > procedure TForm1.Button1Click(Sender: TObject); > begin > With D...
-
하얀까마귀•2000.05.13 01:18안녕하세요 하얀까마귀 입니다.. 에러는 다른곳이 아니라 SQL문에서 day가 key word라서 생기는 겁니다....
-
- 어린왕자
- •
- 2000.05.12 20:27
- 1 COMMENTS
- /
- 0 LIKES
-
어린왕자•2000.05.12 20:33음...방금 다른 컴퓨터에서 되네요.. 이상타..날씨가 흐려서 컴퓨터가 기분이 조아서 그런가..
-
- 황선희
- •
- 2000.05.12 20:21
- 2 COMMENTS
- /
- 0 LIKES
-
cos•2000.05.12 20:43황선희 wrote: > > 테이블을 Paradox로 쓰고 있습니다.(Local DB) > > 그런데, current 값을 읽어오...
-
황선희•2000.05.13 01:03cos wrote: > 황선희 wrote: > > > > 테이블을 Paradox로 쓰고 있습니다.(Local DB) > > > > 그런데...
아마 다음과 같이 해야 할꺼 같은데...
WorkSheet.Range['A1', 'Q1'].Borders[xlDiagonalDown].LineStyle := xlNone;
WorkSheet.Range['A1', 'Q1'].Borders[xlDiagonalDown].LineStyle := xlNone;
WorkSheet.Range['A1', 'Q1'].Borders[xlDiagonalUp].LineStyle := xlNone;
WorkSheet.Range['A1', 'Q1'].Borders[xlEdgeLeft].LineStyle := xlContinuous;
조건일 wrote:
> 델파이를 이제 막 시작한 조건일이라고 합니다
> 제가 질문하고자하는 것은 다음과 같습니다.
>
> var
> Excel, WorkBooks, WorkSheet : OleVariant;
> begin
> Excel := CreateOLEObject('Excel.Application'); // 엑셀문서 시작!
> Excel.WorkBooks.Add;
> WorkSheet := Excel.ActiveWorkBook.WorkSheets[1];
> WorkSheet.Range['A1', 'Q1'].Borders(xlDiagonalDown).LineStyle := xlNone;
> WorkSheet.Range['A1', 'Q1'].Borders(xlDiagonalDown).LineStyle := xlNone;
> WorkSheet.Range['A1', 'Q1'].Borders(xlDiagonalUp).LineStyle := xlNone;
> WorkSheet.Range['A1', 'Q1'].Borders(xlEdgeLeft).LineStyle := xlContinuous;
> WorkSheet.Range['A1', 'Q1'].Weight := xlThin;
> WorkSheet.Range['A1', 'Q1'].ColorIndex := xlAutomatic;
>
> 보시다 시피 엑셀에서 셀을 선택하여 라인을 그리려고 합니다 그런데 계속
> '멤버가 없습니다' 라는 에러 메시지만 내