Lỗi biên dịch:Hàm hoặc biến được mong đợi trong VBA để truy cập

Đặt rstProjets của bạn biến đối tượng thành New ADODB.Recordset , rồi gọi .Open của nó phương pháp.

Dim rstProjets As ADODB.Recordset
ConnectMySQL
Set rstProjets = New ADODB.Recordset
rstProjets.Open "SELECT * FROM subventions LIMIT 5", mysqlConn