如何将一个excel的内容完完全全读到另一个excel（新建）中，包括字体和格式，十万火急。

[lifeng]

我现在要做一个动态报表，思路是先用一个excel做一个表头（因为报表格式各不相同），然后将此表头读出和在数据库（oracle）中读出的结果集拼在一起成为一个新的报表存盘（.xls）,我现在写excel，但读excel不对，我想用ado或atuomation都行，请高手给点指点。

[tripofdream]

直接复制workbook或worksheet,至于方法嘛，复制worksheet在EXCEL中录制一下宏就知道了,复制workbook就是直接复制EXCEL文件

[hydnoahark]

试试这样(使用ADO):
set cn=server.createobject("adodb.connection")
With cn
.Provider = "MSDASQL"
.ConnectionString = "Driver={Microsoft Excel Driver (*.xls)};" & _
"DBQ=excel表头文件; ReadOnly=False;"
.Open
End With

strSQL = "SELECT * INTO [Excel 8.0;Database=新的excel文件].[Sheet1] FROM 工作表"
cn.execute strSQL

[hydnoahark]

一个最简单的方法，使用FileSystemObject把excel表头文件复制一份，直接在新的excel文件中使用ADO写入数据即可