RecordSet Display


rs의 내용을 스프레드에 뿌려줄때...
(1)스프레드의 표현형식이 rs의 각 필드 형식과 맞게 뿌려주는 방법
형식이 numeric인데도 오른쪽 정렬되는 군요...

'''*** (1)
.Col = llngCol '''*** 작업대상 컬럼 지정
.Row = -1 '''*** 전체 Row 지정
.CellType = CellTypeFloat '''*** Cell 타입을 Float 타입으로 설정
.TypeFloatDecimalPlaces = 0 '''*** 소숫점 이하 자리수
.TypeFloatMax = "99999999999999" '''*** 최대값 설정


(2)셀너비를 자동으로 맞추는 함수를 사용했는데..
유독 한글이 포함된 필드는 거의 반까지만 너비를 잡는군요..

'''*** (2)
.Visible = False '''*** 셀의 폭을 정렬할때 데이타의 양에 따라 속도가 느려집니다. 너무느릴경우 사용하세여.
.ColWidth(llngCol) = 1000 '''*** 이줄을 넣었을때와 않넣었을때의 차이점은 직접판단하시길...
.ColWidth(llngCol) = .MaxTextColWidth(llngCol) '''*** 해당 컬럼을 최적의 폭으로 정렬.
.Visible = True


(3)rs의 필드명을 헤드명으로 올리는 방법은 없나요..

'''*** (3)
.Col = llngCol
.Row = 0
.Value = ladoRST.Fields(llngCol - 1).Name


(4)스프레드의 필드 숫자와 rs의 필드숫자와 일치시키는 방법은 없나요..

'''*** (4)
.MaxCols = ladoRST.Fields.Count

[출처] RecordSet Display|작성자 눈꽃

Posted by 야동우
,