Delphi控制excel如何根据数据内容进行分页？？？(200分)

H

heqian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-16

• #1

我现在通过数据查询生成.csv文件，然后用调用excel模板打开打印！
对excel的操作已经基本完成，现在存在的问题是：
我需要根据数据内容进行分页显示，例如：

客户王 xxxxx xxxxxxxx
客户王 xxxxx xxxxxxxx
客户王 xxxxx xxxxxxxx
.... .... .....
————————分页符——————————
客户陈 xxxxx xxxxxxxx
.... ... ....
————————分页符——————————
客户刘 xxxxx xxxxxxxx
... ... ....

我现在采用的办法是遍历该列，判断后插入分页符，但是效率太低，
即使不进行遍历判断，直接在指定位置插入分页符的速度也特别慢；
插入200个分页符得需要70秒左右！

大家有没有好的方法或者思路？？希望大家能够对我指点一二！！

 

S

sql1981

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-16

• #2

在查询的时候就分好啊,我记得dbgrideh里有分页的功能吧,记不清了，你看看它的demo

 

Z

zzx_hunter

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-17

• #3

9) 在第i行之前插入分页符：
ExcelID.WorkSheets[1].Rows.PageBreak := 1;

10) 在第i列之前删除分页符：
ExcelID.ActiveSheet.Columns.PageBreak := 0;

 

W

wql

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-22

• #4

新年帮助你ding!

 

Q

qince

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-28

• #5

http://www.delphibbs.com/delphibbs/dispq.asp?lid=759711

 

H

heqian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-10

• #6

我是想类似报表中分组显示,不同组之间进行分页

 

Y

yf168

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-28

• #7

zzx_hunter说的没问题
对于此类问题,可以在OFFICE各软件内 录制 宏,看一下对应的代码即可

 

小

小刚

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-28

• #8

看看我回答的这样类似的问题:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2127654

 

H

heqian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-23

• #9

多人接受答案了。