Realizar macro para envió de datos

[fuchsvta]

Que tal tengo la siguiente situación, se me entrega un archivo de excel al cual hay que migrar hacia un formato txt, este reporte que esta en excel hay que estar migrandolo al menos 1 vez por semana por lo cual es demasiado el tiempo que se le invierte al hacerlo de forma manual, se puede realizar una macro para que automatize este proceso?

Del archivo resultante en txt se requiere quede de la siguiente forma.

D555555555555555550000000149798400000034334000000099000 .

D541523100000000330000000230004840000034334000000100000 .

detallo el formato de arriba

[TABLE=width: 500]

[TR]

[TD]#[/TD]

[TD]Nombre del campo[/TD]

[TD]Long[/TD]

[TD]Tipo[/TD]

[TD]Valor[/TD]

[TD]Observaciones[/TD]

[/TR]

[TR]

[TD]1[/TD]

[TD]Indicador de Detalle[/TD]

[TD]1[/TD]

[TD][/TD]

[TD]D[/TD]

[TD]Valor constante[/TD]

[/TR]

[TR]

[TD]2[/TD]

[TD]Tipo de Transacción[/TD]

[TD]1[/TD]

[TD][/TD]

[TD][/TD]

[TD]5 = cargo (venta)

6 = abono (devolución)

[/TD]

[/TR]

[TR]

[TD]3[/TD]

[TD]Número de cuenta[/TD]

[TD]16[/TD]

[TD][/TD]

[TD][/TD]

[TD]Justificado a la izquierda con blancos

a la derecha

[/TD]

[/TR]

[TR]

[TD]4[/TD]

[TD]Importe[/TD]

[TD]12[/TD]

[TD][/TD]

[TD][/TD]

[TD]Con dos posiciones decimales. No se

incluye el punto decimal

[/TD]

[/TR]

[TR]

[TD]5[/TD]

[TD]Código de Moneda[/TD]

[TD]3[/TD]

[TD][/TD]

[TD][/TD]

[TD]484 = Pesos

840 = Dólares

[/TD]

[/TR]

[TR]

[TD]6[/TD]

[TD]Número de Referencia (Contrato

del Tarjetahabiente con el

comercio)

[/TD]

[TD]19[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[/TR]

[TR]

[TD]7[/TD]

[TD]Código de resultado[/TD]

[TD]2[/TD]

[TD][/TD]

[TD]00[/TD]

[TD]Enviar en ceros[/TD]

[/TR]

[TR]

[TD]8[/TD]

[TD]Tipo de autorización[/TD]

[TD]1[/TD]

[TD][/TD]

[TD]0[/TD]

[TD]Enviar en ceros[/TD]

[/TR]

[TR]

[TD]9[/TD]

[TD]Numero de autorizacion[/TD]

[TD]6[/TD]

[TD][/TD]

[TD]Esp[/TD]

[TD]Enviar en espacios[/TD]

[/TR]

[TR]

[TD]10[/TD]

[TD]Filler[/TD]

[TD]3[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[/TR]

[/TABLE]

11 Indicador de fin de registro 1 "." Un carácter punto

macro.rar