Murilo,
Esse erro quer dizer q tem um apostrofo no meio da sua string, e ai o SQL nao pode ser executado pq tem DUAS marcações de final de string...
Verifica a integridade do seu arquivo antes de importar...
e para garantir q nao de mais esse erro, antes de montar a string sql, faz um replace nos valores q serao strings, substituindo os apostrofos... Se for SQL Server, vc pode simplesmente dobrar os apostrofos, como dobramos as aspas no VB, q o SQL Server vai gravar apostrofo no banco, sem dar erro...
fica mais ou menos assim:
Valor = Replace(Valor, "'", "''")
Observe q to substituindo UM apostrofo por DOIS, e nao por aspas...
Flw!