** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Otros de Microsoft: Windows y Office > Excel
  Mensajes nuevos Mensajes nuevos RSS - caracter comodin
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradocaracter comodin

 Responder Responder
Autor
Mensaje
maruja Ver desplegable
Asiduo
Asiduo


Unido: 02/Julio/2008
Estado: Sin conexión
Puntos: 418
Enlace directo a este mensaje Tema: caracter comodin
    Enviado: 20/Marzo/2011 a las 17:41
Hola,
 
quiero hacer una macro para importar un archivo txt, pero cómo cada vez va a tener un nombre diferente necesito emplear un caracter comodín. yo he puesto este código pero no me funciona, me da el siguiente error: "ha habido un error y no ha funcionado el procedimiento"
 
    With ActiveSheet.QueryTables.Add(Connection:= _
        "TEXT;C:\Users\Casa\Desktop\BD\'" & datos & "%'.txt", _
 
gracias
Arriba
Emilio Ver desplegable
Administrador
Administrador

Santander

Unido: 08/Agosto/2004
Localización: España
Estado: Sin conexión
Puntos: 18811
Enlace directo a este mensaje Enviado: 20/Marzo/2011 a las 17:47
Hola!
 
¿Desde cuando el comodin en windows es el porcentaje?
 
Los comodines de windows son el asterisco (*) y cierra interrogación (?)
Saludos a todos desde Huelva

http://www.mvp-access.es/emilio/
Arriba
Jordi-Albert Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 06/Abril/2006
Localización: Alemania
Estado: Sin conexión
Puntos: 4315
Enlace directo a este mensaje Enviado: 20/Marzo/2011 a las 19:37
con comodin?

y no te sale más a cuenta mirar que ficheros existen y dar a escoger el que deseas procesar?

en vez de abrirlos TODOS en una sola y única conexion?
Arriba
maruja Ver desplegable
Asiduo
Asiduo


Unido: 02/Julio/2008
Estado: Sin conexión
Puntos: 418
Enlace directo a este mensaje Enviado: 21/Marzo/2011 a las 08:38
tenía intención de poner una carpeta para poner el documento a importar cada vez, he puesto esto:
With ActiveSheet.QueryTables.Add(Connection:= _
        "TEXT;C:\Users\Casa\Desktop\BD\'" & datos & "*'.txt", _
 
y me ha dado error de que el archivo no podía tener el caracter comodin.
 
 
Arriba
Jordi-Albert Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 06/Abril/2006
Localización: Alemania
Estado: Sin conexión
Puntos: 4315
Enlace directo a este mensaje Enviado: 21/Marzo/2011 a las 11:29
si solo tienes un fichero en la carpeta puedes averiguar el nombre antes de abrirlo

strNombreFichero = dir("C:\Users\Casa\Desktop\BD\*.txt")
Arriba
maruja Ver desplegable
Asiduo
Asiduo


Unido: 02/Julio/2008
Estado: Sin conexión
Puntos: 418
Enlace directo a este mensaje Enviado: 22/Marzo/2011 a las 10:07
muchas gracias, ya se puede cerrar el hilo.
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable