[RESUELTO] Lectura de datos de Archivo .txt

Desarrollo de Macros y programación en UNO, usar las API, llamar programas externos...

[RESUELTO] Lectura de datos de Archivo .txt

Notapor Chelo2 » Vie Sep 04, 2015 6:38 pm

Hola amigos:

Hace unos días en una consulta anterior creo que Federico me sugirió el siguiente código para tomar datos de un archivo de texto donde guardaba una ruta que luego utilizaba en una macro.

Código: Seleccionar todo   Expandir vistaContraer vista
Sub Lee_Linea1
Open "D:\constante.txt" For Input As #1
Line Input #1, sLinea
Msgbox sLinea
Close #1
End Sub


Dicho código fue una solución exitosa a mi pregunta, por lo que pensé que podría utilizarlo, además, para recuperar diferente información sobre algunos parámetros que podría guardar para otras macros en líneas diferentes del mismo archivo. Erróneamente supuse que en el código anterior reemplazando donde decía "1" por el N° de línea que quería recuperar iba a lograr lo que buscaba, :bravo: pero estaba :ucrazy: . Siempre recuperé la información de la primera línea aunque cambiara el mencionado número.

Primero quiero pedir disculpas por lo demasiado básico de mis razonamientos, pero pese a mi ignorancia en el tema, tengo ganas de aprender a toda costa y a veces mis "ensayos y errores" rondan lo ridículo... :knock:

Segundo, quería consultarles, si es posible esto de elegir una línea determinada (no necesariamente la primera) del archivo de texto a recuperar para cargarlo en una variable y utilizarlo en diferentes macros. Esto es por ejemplo, guardar diferentes rutas, que en caso de necesitar cambiar, solo modificaría ese archivo de texto y la macro permanecería intacta, haciendo sólo referencia a la línea donde se encontraría dicha ruta.

Espero haber sido claro en mi explicación y les envío un gran saludo desde Buenos Aires, Argentina.

Chelo2
Última edición por Chelo2 el Vie Sep 04, 2015 8:40 pm, editado 1 vez en total
OpenOffice 4.1.3 en Windows 7
Chelo2
 
Mensajes: 100
Registrado: Mié Ago 14, 2013 4:25 am
Ubicación: Lomas de Zamora, Buenos Aires, Argentina

Re: Lectura de datos de Archivo .txt

Notapor fornelasa » Vie Sep 04, 2015 7:03 pm

Como guía ejemplo pudiera ser:

Código: Seleccionar todo   Expandir vistaContraer vista
Sub LeerTodasLasLineas
Open "C:\Users\Federico\Documents\AAAAAAA\constante.txt" For Input As #1
Do While Not EOF(#1)
Line Input #1, sLinea
Msgbox sLinea
Loop
Close #1
End Sub

Lo demas es facil ..... según yo.

Saludos, Federico.
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
Avatar de Usuario
fornelasa
 
Mensajes: 3223
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.

Re: Lectura de datos de Archivo .txt

Notapor Chelo2 » Vie Sep 04, 2015 8:13 pm

Lo demas es facil ..... según yo.


:oops: Que verguenza me da... jeje .. yo no me doy cuenta como modificarlo...

Veo que ahí me da todas las líneas del archivo. Yo lo que quisera es que por ejemplo me de sólo la línea "3" del archivo. quizá en otra consulta la lía "5" del archivo y así. No se como indicarle la línea.

Intenté hecerle modificaciones intuitivas al código que me pasaste Fede, pero bueno.. jeje se ve que mi intuición no es mi fuerte.. sigo igualll.. :x

Gracias por su atención..

Chelo2
OpenOffice 4.1.3 en Windows 7
Chelo2
 
Mensajes: 100
Registrado: Mié Ago 14, 2013 4:25 am
Ubicación: Lomas de Zamora, Buenos Aires, Argentina

Re: Lectura de datos de Archivo .txt

Notapor fornelasa » Vie Sep 04, 2015 8:27 pm

Es que depende de lo que queramos hacer, así tal cual, para leer la linea 3 del archivo, ejemplo:

Código: Seleccionar todo   Expandir vistaContraer vista
Sub LeeLineaTres
x = 0
Open "C:\Users\Federico\Documents\AAAAAAA\constante.txt" For Input As #1
Do While Not EOF(#1)
x = x + 1
If x = 3 Then
Line Input #1, LineaTres
Msgbox LineaTres
Else
Line Input #1, sLinea
End If
Loop
Close #1
End Sub

Saludos, Federico.
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
Avatar de Usuario
fornelasa
 
Mensajes: 3223
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.

Re: Lectura de datos de Archivo .txt

Notapor Chelo2 » Vie Sep 04, 2015 8:39 pm

Seeeeee.... Sos un genio Fede!!!!

Es lo que quería... por más intuición y "ensayo y error" que hubiera aplicado no iba allegar nunca a esoo... :lol: :lol: :lol:

Gracias enomeee.. por tu atención y por la paciencia que me tuviste!!

Un saludo desde Buenos Aires, Argentina.

Chelo2
OpenOffice 4.1.3 en Windows 7
Chelo2
 
Mensajes: 100
Registrado: Mié Ago 14, 2013 4:25 am
Ubicación: Lomas de Zamora, Buenos Aires, Argentina

Re: [RESUELTO] Lectura de datos de Archivo .txt

Notapor fornelasa » Vie Sep 04, 2015 8:43 pm

:super: :super:
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
Avatar de Usuario
fornelasa
 
Mensajes: 3223
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.


Volver a Macros y API UNO

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 1 invitado