主题：报表设计的问题请教

请教老师这样的报表格式如何做，自己弄了好几天了都没有形成，主要来自营业收入和营业支出两张表的数据，EXCEL和专业报表都试过，思路不清晰，是否需要统计在统计，还是用专业报表可以完成                                                                                       日收支报表
营业收入						营业支出
客户编号	客户名称	订单金额	预付定金	未付余款	付款方式	支出编号	支出类别	支出金额	付款方式
001	老马	1000	100	900	现金	Z001	办公用品	500	现金
002	老刘	2000	200	1800	刷卡	Z002	购置材料	600	银行转账
…	…	…	…	…		…	…	…
现金支付	900	刷卡支付	1800			现金支付	500	银行转账	600
月累计收入	20000					月累计支出	10000

用excel来做，做一个收入的报表，再做一个支出的报表

 

然后把两个表拷贝到一起即可。

老师，将两个表拷贝到一起的意思是，把两个报表合成一个报表吗？还是如何操作。

参考

 

Dim App As New MSExcel.Application

Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\test.xls")
Dim Ws1 As MSExcel.WorkSheet = Wb.WorkSheets("sheet1") '指定要复制的工作表
Dim Ws2 As MSExcel.WorkSheet = Wb.WorkSheets("sheet2")
Dim Ws3 As MSExcel.WorkSheet = Wb.WorkSheets("sheet3")

Ws1.UsedRange.Copy
ws3.Cells(1,1).Select
ws3.paste
Ws2.UsedRange.Copy
'ws3.Cells(1,Ws1.UsedRange.Columns.Count).Select '横向拷贝
ws3.Cells(Ws1.UsedRange.Rows.Count,1).Select '纵向拷贝
ws3.paste

'Wb.Save
app.Visible = True
'App.Quit