Legen Sie Ihre ersten Projekte fest Objektvariable in ein New ADODB.Recordset , und rufen Sie dann dessen .Open auf Methode.
Dim rstProjets As ADODB.Recordset
ConnectMySQL
Set rstProjets = New ADODB.Recordset
rstProjets.Open "SELECT * FROM subventions LIMIT 5", mysqlConn