在这个坛子里，学了不少东西，感谢各位大师，我也共享点东东

分栏打印，研究了很久，EXCEL报表不能直接分栏打印，用专业报表繁琐麻烦，因此采用vba程序代码实现

做好模板，更改以下5个参数可实现excel 报表纵向分栏

Dim prs As Integer = 30 \'每页细节区行数
Dim fl As Integer = 2 \'每页栏数
Dim ls As Integer = 6 \'每栏列数
Dim bts As Integer = 5 \'表头数
Dim bws As Integer = 7 \'表尾数

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:excel分栏打印.rar