estou com dificuldade de gerar registro em uma tabela usando essa função ..
Dim X As Long
For X = Me.texto0 To Me.Texto2 'repete do inicial até final
DoCmd.SetWarnings False 'Desliga o aviso
DoCmd.RunSQL "INSERT INTO Tblnumeros (dados) SELECT " & X & ""
Next
DoCmd.SetWarnings True 'Liga o aviso
MsgBox "Concluído", vbInformation
tenho a coluna (dados) e a coluna ( descr).. consigo gerar os registros na coluna dados porem na (descr) não consigo colocar os registros desejados..
alguem para dar uma luz.
Dim X As Long
For X = Me.texto0 To Me.Texto2 'repete do inicial até final
DoCmd.SetWarnings False 'Desliga o aviso
DoCmd.RunSQL "INSERT INTO Tblnumeros (dados) SELECT " & X & ""
Next
DoCmd.SetWarnings True 'Liga o aviso
MsgBox "Concluído", vbInformation
tenho a coluna (dados) e a coluna ( descr).. consigo gerar os registros na coluna dados porem na (descr) não consigo colocar os registros desejados..
alguem para dar uma luz.