【公告】delphi控制excel的疑问：当worksheet打印有多页时,如何在每页的前面加了我自己的标题头?(分不够再加)

Question

【公告】delphi控制excel的疑问：当worksheet打印有多页时,如何在每页的前面加了我自己的标题头?(分不够再加)
姓名  斑级
n1     g1
..中间有一百条数据，worksheet会出现分页情况
...
n99   g2(注：第三页的第一条数据)我要在n99 g2 这一行上也加上标题头  姓名 斑级 如何做?
当然现在我们不知道这个worksheet到底有多少页！数据都是动态增加的。

Answer 1

excelworksheet1.PageSetup.CenterHeader:= '&"隶书"'+你的内容;

Answer 2

！！！！！如何在delphi代码中实现下面的功能：！！！！！A.excel中：文件-页面设置- 工作表-顶端标题行 ="$1:$5"
B.与A中操作相应的vb script代码如下：
"
PrintTitleRows 属性示例本示例将第三行定义为标题行，将第一列到第三列定义为标题列。Worksheets("Sheet1").Activate
ActiveSheet.PageSetup.PrintTitleRows = ActiveSheet.Rows(3).Address
ActiveSheet.PageSetup.PrintTitleColumns = _
        ActiveSheet.Columns("A:C").Address
"
！！！！！如何在delphi代码中实现上面的功能：！！！！！

Answer 3

啊哈哈，好像高定了，，    ws.Activate;    ws.pagesetup.PrintTitleRows := ws.rows['1:5'].Address ;

Answer 4

这个问题以前有人解决过吗，虽然很简单呵?哈哈哈，提交FAQ~