Question

VB 如何将MSHFLEXGRID上查询到的记录导出到EXCEL中？

我用ACCESS做数据库, 然后把查询到的记录放在MSHFLEXGRID里,现在我想把查询到的记录导出到外面建个新EXCEL保存.请问应该做？
最好说明详细些，我百度了半天了没个准缺答案！！！
满意后追加！
我说的是将查询到的结果保存到EXCEL中！

Answer 1

Dim tmpexcel As Excel.Application, tmpsheet As Excel.Worksheet
Dim i As Integer, j As Integer
Set tmpexcel = New Excel.Application
tmpexcel.Workbooks.Add (1)
Set tmpsheet = tmpexcel.ActiveWorkbook.ActiveSheet
For i = 0 To MSHFlexGrid1.Rows - 1
For j = 1 To MSHFlexGrid1.Cols - 1
tmpsheet.Cells(i + 1, j) = MSHFlexGrid1.TextMatrix(i, j)
Next j
Next i

经过测试，完全可以导出到EXCEL

Answer 2

直接可以在ACCESS里另存为EXCEL的