Ola pessoal!!!

como eu faço para gravar os dados que estão em um MSFlexGrid em uma tabela access usando a instrução "INSERT INTO"

 

Carlos Sérgio!!!

Tenta ae:

 

Dim i As Long
Dim SQL As String

 

With MSHFlexGrid1

For i = 1 To .Rows - 1
    SQL = "INSERT INTO Tabela (Nome,Endereco,idade) VALUES ("
    SQL = SQL & "'" & .TextMatrix(i, 0) & "','"
    SQL = SQL & .TextMatrix(i, 1) & "'," & .TextMatrix(i, 2) & ")"
   
    conexao.Execute SQL
Next i

End With

 

Supondo q sua primeira linha seja cabeçalho e conexao é um objeto do tipo ADODB.Connection

 

at+