|
现象见附件
程序代码如下:
procedure TTYDBYBBB.BitBtn1Click(Sender: TObject);
Var
lSheet: Business.Model.TSheetDoc;
begin
lSheet := TSheetDoc(DocView1.Doc);
lSheet.Cells[2,11].Bounds := classes.Rect(2,11,3,16);
DocView1.Doc.Close;
DocView1.OpenView(TDocMode.dmEdit);
end;
上面的代码对表格文档中的主数据部分起作用,对从数据集不起作用。有没有好的解决办法?用分组融合的办法,只能在打印预览的时候起作用,但我要导出EXCEL文件中字段列值相同的单元格合并。
很着急呀,用户等着要呢。
联系电话:0311-87933714 河北电力信息系统项目组 姜 |
|