Criar um Recordset no excel referenciando uma tabela da planilha
Enviado: 11 Mar 2022 às 21:46
Galera, é o seguinte!
Seguinte: o código abaixo, cria um recordset de uma planilha do Excel:
Sub Busca_eventos()
Dim Db As Database
Dim Ds As Recordset
Set Db = OpenDatabase(ThisWorkbook.Path & "\" & ThisWorkbook.Name, False, False, "Excel 8.0")
Set Ds = Db.OpenRecordset("Select * From [Planilha1$]")
Do Until Ds.EOF
MsgBox Ds![NomedoCampo]
Ds.MoveNext
Loop
End Sub
por exemplo:, na linha abaixo, estou referenciando a uma planilha:
Set Ds = Db.OpenRecordset("Select * From [Planilha1$]")
Porém eu tenho uma tabela que criei dentro desta planilha e nomeei como "Tb_Clientes".
Não sei como me referenciar a esta tabela criando um recordset.
Alguém pode me ajudar?
Seguinte: o código abaixo, cria um recordset de uma planilha do Excel:
Sub Busca_eventos()
Dim Db As Database
Dim Ds As Recordset
Set Db = OpenDatabase(ThisWorkbook.Path & "\" & ThisWorkbook.Name, False, False, "Excel 8.0")
Set Ds = Db.OpenRecordset("Select * From [Planilha1$]")
Do Until Ds.EOF
MsgBox Ds![NomedoCampo]
Ds.MoveNext
Loop
End Sub
por exemplo:, na linha abaixo, estou referenciando a uma planilha:
Set Ds = Db.OpenRecordset("Select * From [Planilha1$]")
Porém eu tenho uma tabela que criei dentro desta planilha e nomeei como "Tb_Clientes".
Não sei como me referenciar a esta tabela criando um recordset.
Alguém pode me ajudar?