Mude para Consultas parametrizadas . Isso vai te ajudar. O número de parâmetros corresponderá ao número de colunas em sua tabela em ordem. Crie os objetos ADO conforme necessário e feche-os no final das rotinas Sub.
Insert Into [table name] Values(n1, n2, etc...)
Tutorial SQL
