I got errors converting an Excel date to SQL Server.
Conversion failed when converting date and/or time from character string
rs.open "Table", con, adOpenDynamic, adLockOptimistic, adCmdTable
rs.addNew
rs("DateColumn") = rng.Value
I solved the problem adapting this answer