Erreur définie par l'application ou par l'objet

Bonjour,

Je suis entrain de relier des données excel avec une base des données mysql (phpmyadmin)
je reçois beaucoup d'erreurs dont Erreur définie par l'application ou par l'objet.
J'ai besoin d'aide pour résoudre cela

Merci d'avance.

      
Sub ExportMysql()
Dim Maconnexion As ADODB.Connection
Dim monrecord As ADODB.Recordset
Dim NbLignes As Integer
Dim rowtable As Integer
Dim strSQL As String

Set Maconnexion = New ADODB.Connection
Set monrecord = New ADODB.Recordset

Maconnexion.Open "DRIVER={MySQL ODBC 8.0 Unicode Driver};" & "SERVER=localhost;" & "DATABASE=bd-gmao;" & "USER=root;" & "PASSWORD =;"

NbLignes = Worksheets("personnel").UsedRange.Rows.Count

With Worksheets("personnel")

         For rowtable = 2 To NbLignes
         strSQL = "insert into `bd-gmao`.`essai`(`id`,`nom`,`sexe`,`age`)" & "Values(" & .Cells(rowtable, 1).Value & ", " & .Cells(rowtabl, 2).Value & "," & .Cells(rowtable, 3).Value & ", " & .Cells(rowtable, 4).Value & ")"
         monrecord.Open strSQL, Maconnexion
         Next rowtable

End With

MsgBox "enregistrement réussi" & Chr(10) & (rowtable - 2) & "OK", vbInformation, "vérification de l'entrée des données"

End Sub