Basic - Macro de Basic

   
Vista:

Macro de Basic

Publicado por Martin (1 intervención) el 22/04/2009 16:35:04
Hola, tengo una planilla de calc, la cual en un macro, tiene que tomar datos de un txt (porcvta.txt)
El txt, los datos están separados por un espacio, despues de tomarlos tendria que ordenarlos, pero me interesa la primera parte.
Si me pueden ayudar, porque no entiendo mucho de Programacion en basic.
Muchas gracias y espero respuestas
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Macro de Basic

Publicado por marcelo montagna (5 intervenciones) el 17/05/2009 03:59:59
Cuando levanto un archivo TXT , es mas en mi trabajo todo es siempre en texto plano
asi tienen las empresas configurados sus sistemas y se los tenes que entregar como
ellos te lo piden

en fin ...

En QBASIC suponiendo que el archivo sea de la siguiente forma:

nombre,domicilio,algomas
marcelo,belgrano,jajaja
pirulo,balvanera,jojojo

obviamente en EXXEL ( GUARDAR COMO CSV ) "separado por comas"

El programa seria asi:

DIM MEMORIA$(10,3)

OPEN "I" , #1, "ARCHIVO.TXT"
1 IF EOF (1) THEN CLOSE : END ' AQUI TERMINO
INPUT #1, DATO1$,DATO2$,DATO3$
REG=REG+1
MEMORIA$(REG,1)=DATO1$
MEMORIA$(REG,2)=DATO2$
MEMORIA$(REG,3)=DATO3$
GOTO 1

Abre archivo
se fija EOF fin de archivo
lee nombre,domicilio,algomas y pasa a las variables dato1,2 y 3
contador REG
pone en la matris de memoria los datos que lee del archivo de texto separado por comas
GOTO regresa a linea 1

Si es en VBASIC NET seria algo asi:
te copie y pegue de un programa mio

en GENERAL pones

Imports System.IO

y el programa :

FileOpen(1, archivo, OpenMode.Input)
Do While Not EOF(1)
lee = LineInput(1)
contA = contA + 1
arrTextArchivoTodo(contA) = lee
Loop
FileClose(1)

Abre el archivo en modo lectura
DO WHILE es una condicion para salir del ciclo cuando no tenga mas registros
contador
pone en el array los datos que lee
Loop regresa a Do While
si no tiene mas registros para leer cierra el archivo con FileClose(1)

Cualquier cosa , pues no se en que lenguaje de los tantos basic seria
te mando algun programa que tenga echo , me pides al correo
marcelo_montagna@hotmail.com sin ningun problema, salu2 y suerte...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Macro de Basic

Publicado por Robinson Fernandez (2 intervenciones) el 02/12/2009 00:13:32
RE:Macro de Basic
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar