Ciao a tutti,
ho cercato per tutto il forum ma non sono riuscito a trovare qualcosa di adatto.
Non sono molto pratico di VB6, ma ho bisogno di esportare una MSFlexGrid completa (con tanto di righe, colonne e intestazioni) popolata da Database (.mdb) e alcune Label.. in un file Excel o Word per poi poter modificare eventualmente alcuni dati.
Con una DataGrid CREDO si possa fare in questo modo:
codice:
Private Sub Command4_Click()
Dim objExcel As Object
Dim objWorkbook As Object
'
On Error Resume Next
Set objExcel = GetObject(, "Excel.Application")
If Err.Number Then
Err.Clear
Set objExcel = CreateObject("Excel.Application")
If Err.Number Then
MsgBox "Can't open Excel."
End If
End If
objExcel.Visible = True
Set objWorkbook = objExcel.Workbooks.Add
Call objExcel.Range("A1").CopyFromRecordset(NOMEDATAGRID.Recordset)
End Sub
ma con una MSFlexGrid che non ha la funzione Recordset...come devo fare?
Grazie a tutti!