como importar a un libro un archivo con demasiadas filas?

23/08/2005 - 09:52 por Mercedes | Informe spam
Necesito importar un archivo a excell que tiene demasiadas filas, pero tiene
que ir todo en el mismo libro.
No se si hay forma de aumentar el límite de las filas o si alguien sabe de
otro programa con el que abrir el archivo y solucionar el problema.
Gracias

Mercedes

Preguntas similare

Leer las respuestas

#6 Héctor Miguel
24/08/2005 - 23:31 | Informe spam
hola, Mercedes !

... importarlo desde access, no me deja de ninguna manera, asi que no puedo hacerlo de esa forma.



[supongo que en esta parte] necesitaras 'clarificar' que/como haces que... 'no te deja' -?-

He cambiado Imput por Input y tampoco me ha dado resultado.
La version que estoy utilizando de excel es la 2003 y el codigo es ASCII.



por esta otra parte... [disculpas] me refiero a transcribir el codigo-macro [es decir...]
-> las lineas de la macro con la que estas intentando importar el archivo :(

comentas?
saludos,
hector.
Respuesta Responder a este mensaje
#7 Mercedes
25/08/2005 - 10:23 | Informe spam
Buenos dias Hector!

Lo que no me deja hacer access es importar el archivo. Lo intento desde
archivo, obtener datos externos, importar. Pero no me admite archivos con esa
extensión.

No tengo ni idea de que es trascribir el código de la macro, no soy muy
experta en estos temas.

Lo único que puedo hacer es darte el sitio desde el que me tengo que bajar
el archivo para que si puedes le eches un ojo, ya que te enterarás seguro
mejor que si yo te lo explico.

http://www.cdn.ca/Proofs/prod02.htm

Una vez ahí seleccionas All Breeds, una vez se descomprime el archivo la
parte que me interesa es mace0508.ho.

Esto es todo lo que se explicarte sobre el tema, como siempre muchas gracias
por el interés de todas formas.

Un saludo
"Héctor Miguel" escribió:

hola, Mercedes !

> ... importarlo desde access, no me deja de ninguna manera, asi que no puedo hacerlo de esa forma.

[supongo que en esta parte] necesitaras 'clarificar' que/como haces que... 'no te deja' -?-

> He cambiado Imput por Input y tampoco me ha dado resultado.
> La version que estoy utilizando de excel es la 2003 y el codigo es ASCII.

por esta otra parte... [disculpas] me refiero a transcribir el codigo-macro [es decir...]
-> las lineas de la macro con la que estas intentando importar el archivo :(

comentas?
saludos,
hector.



Respuesta Responder a este mensaje
#8 Carlos Durán Urenda
26/08/2005 - 00:12 | Informe spam
que formato tienen los datos? es texto separado por comas?
y si cambias la extension a .txt para importarlo desde Access?

Saludos
Carlos Durán


"Mercedes" escribió en el mensaje
news:
Buenos dias Hector!

Lo que no me deja hacer access es importar el archivo. Lo intento desde
archivo, obtener datos externos, importar. Pero no me admite archivos con
esa
extensión.

No tengo ni idea de que es trascribir el código de la macro, no soy muy
experta en estos temas.

Lo único que puedo hacer es darte el sitio desde el que me tengo que bajar
el archivo para que si puedes le eches un ojo, ya que te enterarás seguro
mejor que si yo te lo explico.

http://www.cdn.ca/Proofs/prod02.htm

Una vez ahí seleccionas All Breeds, una vez se descomprime el archivo la
parte que me interesa es mace0508.ho.

Esto es todo lo que se explicarte sobre el tema, como siempre muchas
gracias
por el interés de todas formas.

Un saludo
"Héctor Miguel" escribió:

hola, Mercedes !

> ... importarlo desde access, no me deja de ninguna manera, asi que no
> puedo hacerlo de esa forma.

[supongo que en esta parte] necesitaras 'clarificar' que/como haces
que... 'no te deja' -?-

> He cambiado Imput por Input y tampoco me ha dado resultado.
> La version que estoy utilizando de excel es la 2003 y el codigo es
> ASCII.

por esta otra parte... [disculpas] me refiero a transcribir el
codigo-macro [es decir...]
-> las lineas de la macro con la que estas intentando importar el archivo
:(

comentas?
saludos,
hector.



Respuesta Responder a este mensaje
#9 Héctor Miguel
26/08/2005 - 01:31 | Informe spam
hola, Mercedes!

Lo que no me deja hacer access es importar el archivo.
Lo intento desde archivo, obtener datos externos, importar.
Pero no me admite archivos con esa extension.



=> necesitaras 'cambiarle' la EXTension de .HO a .TXT

... ni idea de que es trascribir el codigo de la macro, no soy muy experta en estos temas.
... puedo... darte el sitio desde el que me tengo que bajar el archivo para que si puedes le eches un ojo
http://www.cdn.ca/Proofs/prod02.htm
... seleccionas All Breeds, una vez se descomprime el archivo la parte que me interesa es mace0508.ho



el archivo que necesitas [mace0508.ho] -al parecer- NO tiene una 'estructura' [digamos]... 'transportable' -?-
[en via de mientras]... el codigo que te expongo al final, 'lee' los registros/lineas del archivo y...
-> va agregando una hoja al libro por cada 65536 filas [por cada hoja]
-> o... el numero de filas que TU le indiques en la variable llamada ->MaxReg_Hoja<-
-> modifica la ruta al archivo por la que sea [realmente] donde tu has copiado dicho archivo [sin modificar la EXTension]
-> si quieres 'ir viendo' lo que hace la macro... QUITA el apostrofo/comentario a las lineas 11, 12 y 23

si cualquier duda [o cambios... informacion adicional]... comentas?
saludos,
hector.

1) abre el editor de vba con {Alt}+{F11}
2) selecciona [menu] insertar / modulo
3) copia/pega las siguientes lineas... y 'regresando' a excel... 'ejecutas' la macro...
en un modulo de codigo 'normal' ==Sub ImportarArchivosTXTextensos()
Dim Directorio As String, Archivo As String, Linea As String, _
Archivo_n As Integer, Fila As Long, Registro As Double, MaxReg_Hoja As Long
Directorio = "C:\Ruta y\Sub-carpeta donde\pusiste el archivo\" ' <= actualiza esta ruta al archivo '
Archivo = "mace0508.ho"
MaxReg_Hoja = 65536
Archivo_n = FreeFile()
Open Directorio & Archivo For Input As #Archivo_n
Application.ScreenUpdating = False
Worksheets.Add After:=Worksheets(Worksheets.Count)
Do While Seek(Archivo_n) <= LOF(Archivo_n)
' Registro = Registro + 1
' Application.StatusBar = "Importando Registro " & Registro & " del archivo " & Archivo & " ..."
Line Input #Archivo_n, Linea
If Fila = MaxReg_Hoja Then
Worksheets.Add After:=Worksheets(Worksheets.Count): Fila = 1
Else: Fila = Fila + 1
End If
With Worksheets(Worksheets.Count).Range("a" & Fila)
If Left(Linea, 1) = "=" Then .Value = "'" & Linea Else .Value = Linea
End With
Loop
Close #Archivo_n
' Application.StatusBar = False
End Sub
Respuesta Responder a este mensaje
#10 Héctor Miguel
26/08/2005 - 18:44 | Informe spam
hola [de nuevo], Mercedes!

... ni idea de que es trascribir el codigo de la macro, no soy muy experta en estos temas.
... puedo... darte el sitio desde el que me tengo que bajar el archivo para que si puedes le eches un ojo
http://www.cdn.ca/Proofs/prod02.htm
... seleccionas All Breeds, una vez se descomprime el archivo la parte que me interesa es mace0508.ho



tienes alguna direccion de correo para enviarte la macro que necesitas ???

saludos,
hector.
Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida