Problemas al importar CSV

conn.Open "DRIVER={Microsoft Text Driver (*.txt;*.csv)};DBQ="c;\CSV\;Extensions=asc,csv,tab,txt;HDR=YES"

   Hola, Cuando intento importar datos desde un archivo CSV a una tabla de accés, resulta que los campos de texto del fichero CSV que no estan entre comillas los considera numericos y pierde la información textual. por ejemplo con el NIF importa el numero de DNI pero pierde la letra. 
He intento definir el tipo pero me indica que si el fichero esta abierto no puede, y si esta cerrado no lo uede hacer . 
Uso el siguiente codigo : 

conn.Open "DRIVER={Microsoft Text Driver (*.txt;*.csv)};DBQ="c;\CSV\;Extensions=asc,csv,tab,txt;HDR=YES"

   sql = "SELECT * FROM [" & fichero_csv & "]"
   rs.Open sql, conn, adOpenUnspecified, adLockUnspecified, -1

    For Each f In rs.Fields

         If f.Name = "nif" Then Nif = f.Value
     next 

Alguien sabe como conseguir que recupere toda la informacion del NIF  del fichero CSV que tiene numero y letra , ahora solo me recupera el numero 

Muchas gracias 

Autor	Mensaje Tema Buscar Opciones del Tema Responder Crear un nuevo tema Versión imprimible Traducir Tema
Profefp Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Añadir a la lista de amigos Nuevo Unido: 25/Marzo/2021 Localización: Barcelona Estado: Sin conexión Puntos: 1	Opciones de entrada Responder Cita Profefp Informar de mensaje Gracias(0) Cita Respuesta Tema: Problemas al importar CSV Enviado: 25/Marzo/2021 a las 00:35
	Hola, Cuando intento importar datos desde un archivo CSV a una tabla de accés, resulta que los campos de texto del fichero CSV que no estan entre comillas los considera numericos y pierde la información textual. por ejemplo con el NIF importa el numero de DNI pero pierde la letra. He intento definir el tipo pero me indica que si el fichero esta abierto no puede, y si esta cerrado no lo uede hacer . Uso el siguiente codigo : conn.Open "DRIVER={Microsoft Text Driver (.txt;.csv)};DBQ="c;\CSV\;Extensions=asc,csv,tab,txt;HDR=YES" sql = "SELECT FROM [" & fichero_csv & "]"* rs.Open sql, conn, adOpenUnspecified, adLockUnspecified, -1 For Each f In rs.Fields If f.Name = "nif" Then Nif = f.Value next Alguien sabe como conseguir que recupere toda la informacion del NIF del fichero CSV que tiene numero y letra , ahora solo me recupera el numero Muchas gracias

lbauluz Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Visite la página de los usuarios Añadir a la lista de amigos Administrador Unido: 29/Marzo/2005 Localización: La Gloria Estado: Sin conexión Puntos: 3878	Opciones de entrada Responder Cita lbauluz Informar de mensaje Gracias(0) Cita Respuesta Enviado: 25/Marzo/2021 a las 09:31
	Solo por dar una idea, prueba con conn.Open "Driver={Microsoft Text Driver (.txt;.csv)};Dbq=C:\CSV\;Extensions=asc,csv,tab,txt;Persist Security Info=False;Fmt=Delimited" Luis
	El Búho es un pajarraco

pitxiku Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Añadir a la lista de amigos Colaborador Unido: 27/Septiembre/2017 Localización: En mi casa Estado: Sin conexión Puntos: 1536	Opciones de entrada Responder Cita pitxiku Informar de mensaje Gracias(0) Cita Respuesta Enviado: 25/Marzo/2021 a las 11:23
	Una posibilidad es crear un archivo Schema.ini, donde puedes indicar la configuración de tu archivo de texto: - https://docs.microsoft.com/es-es/sql/odbc/microsoft/schema-ini-file-text-file-driver?view=sql-server-ver15 Si el archivo lo estás cargando en una tabla de Access, puedes usar las opciones de importar texto y crear una especificación de importación para usarla cuando quieras. Una vez creada puedes usarla siempre que quieras, ya sea en macro o código VBA: - https://support.microsoft.com/es-es/office/programar-una-especificaci%C3%B3n-de-importaci%C3%B3n-o-exportaci%C3%B3n-34b181e4-1564-4428-bf5c-a222e83f2a68 - https://support.microsoft.com/es-es/office/ejecutar-una-especificaci%C3%B3n-guardada-de-importaci%C3%B3n-o-exportaci%C3%B3n-6969e099-4573-40f0-a1e0-f3042bddb640