Creo que todo lo que necesitas es esto
Dim Rst As ADODB.Recordset
y esto
Set Rst = cmd.Execute
Creo que todo lo que necesitas es esto
Dim Rst As ADODB.Recordset
y esto
Set Rst = cmd.Execute
Diferentes formas de ver tablas en el servidor MySQL
Cómo instalar ODP.NET 2.111 y ODP.NET 4.112 en la misma máquina en paralelo mientras ambos apuntan al mismo servidor de base de datos
Creación de perfiles de consultas compatibles con el ancho de banda para Azure SQL Database
Creando una fila en blanco para una fila repetida