主题：求助 大量数据打印问题

我现在有一个excel难以解决的问题，希望能使用这个软件实现，能够达到各位的帮助，如下：

有一个庞大的数据量需要打印，有3万条左右，现在在excel中是只排成一列，如果打印出来的话纸张浪费太巨大，所以现在想能把这些数据按序排成4~5列,不知道这个软件能否实现？

希望知道的朋友能帮帮我，谢谢！！！

简单点说就是

1                                  1    4    7

2                                  2    5    8

3                                  3    6    9

4                                  

5

6

7

8

9

能实现吗？谢谢啦！！！

就是排成5列也有6千多行啊，每页40行也要打150页呀。  放弃吧。

必须要打，没办法的，150页也要打，谢谢啦，能实现就行，总比打印几千张好啊

应该可以，你做个例子上来吧。

 

就拿上面那个例子说，1~9使代表很多数据排成一列，然后要在一页中体现

1    4    7

2    5    8

3    6    9

 

换一页

10   13    16

11   14    17

12   15    18

 

以此类推

 

万分感谢啊

比如 1000 行： 共1-1000个数字 把下面代码放在命令窗口： 看看结果！···

 

Dim Book As New XLS.Book
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim n As Integer = 0
For c As Integer = 0 To 4
    For r As Integer = 0 To 199
        Sheet(r, c).Value = r+1+n*200
        If r =(n+1)*200 Then
            Exit For
        End If
    Next
    n = n+1
Next
Book.Save("c:\test.xls")
Dim Proc As New Process '打开工作簿
Proc.File = "c:\test.xls"
Proc.Start()