在.NET环境下将报表数据导出Excel和Word

e[6NG)v3.将表中的内容导出到WORD软件测试技术门户R:H&X*g7~K.A`GW3L

Y N~?V_n\　Dim wordApp As New Word.Application()软件测试技术门户7~!SB"rk~r
　　Dim myDoc As Word.Document
t)dB}}　　Dim oTable As Word.Table软件测试技术门户Z;u5R3RzGsvrg
　　Dim rowIndex, colIndex As Integer软件测试技术门户N3s7nH6C
D&c
　　rowIndex = 1软件测试技术门户p4n ^nG'j}^#U
　　colIndex = 0软件测试技术门户Ku'PL.N
　　wordApp.Documents.Add()软件测试技术门户wE.G
^5a1JDm
　　myDoc = wordApp.ActiveDocument软件测试技术门户(nV
P*p({B
　　Dim Table As New DataTable()软件测试技术门户6z(LH"Ul8~O
　　Table = CreaTable()软件测试技术门户#Y L3?]x
　　oTable = myDoc.Tables.Add(Range:=myDoc.Range(Start:=0, End:=0), NumRows:=Table.Rows.Count + 1, NumColumns:=Table.Columns.Count)软件测试技术门户fV.p]9hQ
　　'将所得到的表的列名,赋值给单元格
#s)g7tN'DVl#p z0B(O　　Dim Col As DataColumn软件测试技术门户