Estou tentanto jogar o dado do campo Email de uma consulta com nome C_Clientes, para a variável Email1, usando o código abaixo:
Sub Enviar_Click()
Dim rst As DAO.Recordset
Dim db As DAO.Database
Dim strSQL As String
Set db = CurrentDb()
strSQL = "Select * FROM C_Clientes, Email"
Set rst = db.OpenRecordset(strSQL)
Set Email1 = rst
End Sub
Mas está dando erro: Run-time error '3078', Cannot find the imput table or query 'Email'.
Alguém poderia me ajudar?
Desde já agradeço.
Sub Enviar_Click()
Dim rst As DAO.Recordset
Dim db As DAO.Database
Dim strSQL As String
Set db = CurrentDb()
strSQL = "Select * FROM C_Clientes, Email"
Set rst = db.OpenRecordset(strSQL)
Set Email1 = rst
End Sub
Mas está dando erro: Run-time error '3078', Cannot find the imput table or query 'Email'.
Alguém poderia me ajudar?
Desde já agradeço.