Insérer de nouveaux enregistrements uniquement dans la table SQL à l'aide de VBA

Votre requête SQL n'est pas tout à fait correcte - il n'y a pas de THEN dans un SQL IF .

De plus, vous n'avez rien à faire s'il existe, utilisez-le simplement s'il n'existe pas.

"IF NOT EXISTS (SELECT 1 FROM dbo.Customers WHERE FirstName = '" & sFirstName & "' and LastName = '" & sLastName & "') " & _
         "INSERT INTO dbo.Customers (FirstName, LastName) " & _
         "VALUES ('" & sFirstName & "', '" & sLastName & "')"