DB data를 Excel로 저장.
db data를 excel의 cell 에 한건씩 write를 하게 되는데요
그때 셀서식을 지정할수 있는 방법이 없나요?
텍스트값이 숫자일때 숫자 모드로 되서 앞의 0이 나타나지 않거든요
with DataSet do
begin
First;
while not EOF do
begin
for CurColumn := 0 to FieldCount-1 do
begin
FieldValue := Fields[CurColumn].Value; {필드값}
ExcelIns.ActiveSheet.Cells[CurLine, CurColumn+1].Value :=
FieldValue;
end;
Next;
Inc(CurLine);
Inc(Cnt);
end;
EnableControls;
end;
찍는 값 앞에 작은따옴표를 찍어주심 됩니다.
ExcelIns.ActiveSheet.Cells[CurLine, CurColumn+1].Value :=
'''' + FieldValue;