主题：跨页断行如何实现

 不要放在一行里，合并多行即可，比如

rt.Cells(0,4).SpanRows = 6 '第1行第5个单元格向下合并6行

 最后一行，向下合并多行啊。比如

rt.Cells(填写你的行号啊, 1).SpanRows = 999

 不会做，请上传具体实例。

 你可以这样设计：用2行或者3行或者更多当成一行来使用。也就是每一行，实际上，就是3行的高度。

 这样设计后，单元格赋值时你要对应的加上2或3，具体细节自己调整。

 不会做，请上传可以测试的实例。

 你不是合并了6行了嘛？合并了高度就是和其它列一致的。

 如果你指的是第一行没有垂直居中，那你应该设置其垂直格式。