Bisual Vasic en Excel

[Mclaud]

Estoy creando una macro en Excel, VB mediante. No tengo mucha idea del tema, pero sorprendetemente he ido sacando adelante lo que queria hacer. Solo me queda el paso final, que no es ams que guardar el archivo con el que se trabaja. Es un txt abierto con Excel, con las comas delimitando los decimales y al que aplico esto.

ActiveWorkbook.SaveAs Filename:=c\prueba.txt, FileFormat:=xlText, CreateBackup:=False

Segun todos los escritos esto deberia darme el archivo en formato txt y con las comas como indicadores de los decimales. Sin embargo, crea un archivo txt en el que los puntos son los indicadores decimales. Lo sorprendente es que si no incluyo este paso y lo guardo yo manualmente, se guarda como deberia.

Alguna idea de como arreglarlo?.

[Yongasoo]

No incluyas el paso y guardalo manualmente.

[Mclaud]

Es una macro pensada para trabajar con muchos archivos. La gracia esta en automatizar totalmente su tratamiento.

Aun a mala, ando buscando alguien que me cree un programa que abra todos los archivos de texto de una carpeta y sustituya los puntos por comas.

[rianxeira]

Aun a mala, ando buscando alguien que me cree un programa que abra todos los archivos de texto de una carpeta y sustituya los puntos por comas.

Eso te lo hago yo en 5 minutos, si lo quieres me avisas que incluso debo de tener el codigo de un programa parecido guardado por aqui.

[Mclaud]

Tienes un privado.

[Yongasoo]

Aun a mala, ando buscando alguien que me cree un programa que abra todos los archivos de texto de una carpeta y sustituya los puntos por comas.

Eso te lo hago yo en 5 minutos, si lo quieres me avisas que incluso debo de tener el codigo de un programa parecido guardado por aqui.

Eso lo hace el mismo Block de Notas, en Edición\Reemplazar.

[rianxeira]

Mañana mismo te lo envio

[rianxeira]

Ejem, siento la tardanza pero es que estaba muy pilado por los examenes.

Este programa lo que hace es sustituir los puntos por comas en todos los archivos que tengas en el directorio donde pusiste el programa, es importante que no le cambies el nombre al programa porque sino te da un error de windows la pila de majo al intentar acceder a si mismo mientras esta en ejecución, lo mismo que si tienes abierto alguno de los ficheros a tratar.

Pruebalo antes con ficheros sin importancia a ver si funciona bien, si tienes alguna pega (quieres que vaya a otro directorio o lo que sea) me lo comunicas.

Ah, se me olvidaba, esta escrito en C#, que es el compilador que tenia mas a mano, asi que tener instalado el .Net framework que tienes en el windows update si es que ya no lo tienes instalado para que te funcione el elephant o cualquier otro programa que use .Net

PD: cambiale la extension de .txt a .exe, que sino no me lo dejaba subir como adjunto

[Prez]

En linux, al menos usando una bash:

Código: Seleccionar todo

for I in $( ls directorio/*.txt ); do sed 's/\./,/g' $I > $I.bak; rm -f $I; mv $I.bak $I; done