Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Abrir un fichero de texto y copiar el contenido a través de una macro.

02/04/2012 - 00:24 por frank69 | Informe spam
Ayuda Hacer una pregunta
¡ Hola !
Quisiera saber si desde excel, a través de una macro, se puede abrir un fichero (y no sé el nombre y que cada vez será diferente) con el bloc de notas, seleccionar todo lo que hay (Seleccionar todo), copiar, cerrar el bloc de notas y pegar en excel, a partir de una celda concreta.

Muchas gracias, por anticipado.
email Siga el debateRespuesta 7 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 cec-rr
05/02/2014 - 09:37 | Informe spam
Pedro F. Pardo escribió el 02/04/2012 13:19 :
OPS

Antes le di a enviar antes de tiempo ¬_¬

Esta versión mejorada de la macro va pegando las lineas una en cada
celda,
una debajo de otra...

Sub copia_y_pega()
Open "C:test.txt" For Input As #1
contenido = Input(LOF(1), #1)
linea = Split(contenido, Chr(13))
For i = 0 To UBound(linea)
Range("D" & 5 + i).Value = linea(i)
Next i
Close #1
End Sub


hola Pedro, tengo el siguiente inconveniente, el archivo csv tiene como 20 columnas y hacia abajo muchas filas, y con el programa solo logro convertir una palabra de todo mi archivo, porque esta delimitado por ";" y tambien espacios, es decir "00778894 ;" y pasa al siguiente dato de la siguiente columna, como podria hacer? mil gracias por tu ayuda

Preguntas similares

 

Busqueda sugerida :