poi ti riporto la macro che ho usato per un test, inserendo 4 record in un db,
puoi vedere come viene usato il file UDL che ti ho fatto creare
codice:
Sub Macro1()
Set tdb = CreateObject("ADODB.Connection")
tdb.connectionstring = "file name=E:\TEMP\TestDB_NativeClient.UDL;"
tdb.Open
sqlcmd = "INSERT INTO rooms ( idhotel, room, status)" & _
"SELECT 9, 1, 'OK'" & _
"UNION ALL SELECT 9, 2, 'OK'" & _
"UNION ALL SELECT 9, 3, 'NO'" & _
"UNION ALL SELECT 9, 4, 'OK'"
tdb.Execute (sqlcmd)
tdb.Close
End Sub
certo, dovremo complicare un poco la macro per leggere tutte le righe da inserire (ma non molto)