Excel - archivos txt

 
Vista:
sin imagen de perfil

archivos txt

Publicado por Alcides (4 intervenciones) el 22/02/2017 21:57:20
HOLA BUENAS TARDES ESPERO ME PUEDAN AYUDAR SOY ANALISTA DE NOMINA Y CREE DENTRO DE LA NOMINA DE EXCEL UNA FORMULACIÓN QUE ME GENERA EL ARCHIVO TXT EL CUAL SE SUBE AL BANCO YA QUE ACTUALMENTE SE HACE ATRAVES DE UN PROGRAMA LLAMADO SUPERNOMINA DEL BANCO DE VENEZUELA PERO EL PROCEDIMIENTO ES MUY TEDIOSO POR LO QUE TRATE DE HACER EL TXT DESDE EXCEL Y LOGRE QUE LA ESTRUCTURA Y LOS ESPACIOS FUER IGUAL PERO AL SUBIR AL BANCO ME DA UN ERROR "LA SUMATORIA DE LOS CREDITOS ES DIFERENTE AL DE LOS DEBITOS" LO OTRO QUE ME PERCATE ES QUE EL ARCHIVO QUE GENERA EL PROGRAMA ES DE EXTENCION .DAT Y EL QUE CREE EN EXCEL ES TXT
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
Imágen de perfil de Antoni Masana
Val: 4.908
Oro
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

archivos txt

Publicado por Antoni Masana (2477 intervenciones) el 23/02/2017 06:53:33
No entiendo cual es tu pregunta o tu problema.
Soy de España y desconozco como funciona el sistema de nóminas de Venezuela, pero si se como crear un fichero de texto.
Si puedes ser un poco mas explicito y si es necesario subir un ejemplo podre ayudarte.
Con la explicación de "creo un fichero de texto y la suma del debe y el haber no cuadra" no da muchas pistas de cual es el problema.

Si has de subir un fichero ten en cuenta que son nóminas y son datos confidenciales.

Saludos.
\\//_
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
Imágen de perfil de Andres Leonardo
Val: 3.136
Plata
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

archivos txt

Publicado por Andres Leonardo (1583 intervenciones) el 23/02/2017 14:41:19
Buenos dias, si subes un archivo de ejemplo con gusto como experiencia en esto trabajo en crear archivos texto desde excel

Yo siempre creo un resumen para que asi puedas saber cual es el codigo , valor total numero de registros etc....

**Solo necesito un ejemplo de como tienes la HOJA y cual seria el formato

confirmame si tiene cabecera o pie de archivo ...

Lo haces con unamacro ??' o copias y pegas

espero poderte ayudar

Saludos
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
Imágen de perfil de Marcos Rojas

archivos txt

Publicado por Marcos Rojas (7 intervenciones) el 05/02/2022 10:40:46
Que tal amigo tambien trabajo en nomina y tengo un problema similar
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
Imágen de perfil de Marcos

archivos txt

Publicado por Marcos (7 intervenciones) el 08/02/2022 16:52:58
Que tal necesito una ayuda por favor. Desarrolle una Macro en excel para generar archivos txt la macro al parecer funciona, ya que me convierte la información en el rango de celdas a como la necesita el banco, pero cuando tratan de subir el txt a la pagina del banco este rechaza el archivo por que según el formato de fecha es invalido. Yo coloque de forma manual directo en el txt el formato de fecha como
lo requiere el banco el cual es de la siguiente forma dd/mm/aa y aun así el banco sigue rechazando el archivo y de verdad necesito que los pagos especiales se hagan mediante este archivo txt. Soy analista de nomina en un hotel

le agradezco pudiera ayudarme con esto

Gracias

Marcos Rojas del Hotel Puerta del Sol Margarita Grupo Faranda

mi correo: [email protected]
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
Imágen de perfil de Andres Leonardo
Val: 3.136
Plata
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

archivos txt

Publicado por Andres Leonardo (1583 intervenciones) el 08/02/2022 20:30:33
stimado Marcos,

pero cual es el diseño del archivo que debes generar para revisar
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
Imágen de perfil de Marcos

archivos txt

Publicado por Marcos (7 intervenciones) el 10/02/2022 17:46:09
LE ADJUNTO 2 ARCHIVOS TXT mas el archivo excel que genera el txt
UNO GENERADO CON LA MACRO EN EXCEL QUE HIZE Y EL OTRO GENERADO CON EL PROGRAMA ZEUS NOMINA (SOFTWARE COMERCIAL QUE USA LA EMPRESA DONDE TRABAJO Y SE QUE EL PROGRAMA ESTA HECHO EN VISUAL FOX PRO
DE HECHO EL ARCHIVO ES ACTUAL Y REAL EL QUE SE GENERA CON LA MACRO EN EXCEL Y DE NUEVO HOY LO RECHAZO EL BANCO (FORMATO DE FECHA INVALIDO)Y TUVE QUE VOLVER A CARGAR LA INFORMACIÓN PERO CON EL SOFTWARE ZEUS NOMINA

LE AGRADEZCO SI PUDIERA AYUDARME

[email protected]

@marcosrojas3468
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
Imágen de perfil de Antoni Masana
Val: 4.908
Oro
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

archivos txt

Publicado por Antoni Masana (2477 intervenciones) el 10/02/2022 18:40:14
La macro corregida para que sea igual al que acepta el banco.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Sub generarTXT()
 
    nombre_archivo = Range("J4").Value
    Ruta = Range("J3").Value & "\" & nombre_archivo & ".txt"
 
    ultima_fila = Cells(Rows.Count, 8).End(xlUp).Row
 
    Open Ruta For Output As #1
 
    Print #1, Left(Cells(1, 1) + Space(41), 41) & _
                   Cells(1, 2) & Cells(1, 3) & Cells(1, 4) & Cells(1, 5) & _
                   Cells(1, 6) & Cells(1, 7) & Cells(1, 8)
 
    For i = 2 To ultima_fila
        Print #1, Cells(i, 1) & Cells(i, 2) & Cells(i, 3) & Cells(i, 4) & _
                  Cells(i, 5) & Left(Cells(i, 6) + Space(40), 40) & _
                  Cells(i, 7) & Cells(i, 8)
    Next
 
    Close #1
 
    MsgBox (" se convirtió correctamente !")
 
End Sub

Las únicas diferencias es que en algunos nombres hay 2 espacios entre los nombres.

Saludos.
\\//_
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
Imágen de perfil de Marcos

archivos txt

Publicado por Marcos (7 intervenciones) el 16/02/2022 20:25:19
Buenas tardes la macro corregida la implemente y de nuevo el banco rechazo el archivo txt generado con la macro en excel al día de hoy

le adjuntare los dos archivos el que rechazo hecho con la macro y el que acepto que tuve que hacerlo con zeus nomina

en la pagina del banco esta pone que el archivo txt (el que hice con la macro) tiene el formato de fecha invalido
pero este archivo tiene en la primera linea la fecha tal cual como el que se genera con zeus dd/mm/aa

si pudieran ayudarme con esto por favor
se adjuntan archivos texto mas archivo con la macro que genera el texto.

GRACIAS
ESPERANDO DE SU AYUDA
[email protected]
+58 416 1988557
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
Imágen de perfil de Antoni Masana
Val: 4.908
Oro
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

archivos txt

Publicado por Antoni Masana (2477 intervenciones) el 17/02/2022 15:19:18
La macro con las correcciones

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Sub generarTXT()
 
    nombre_archivo = Range("J4").Value
    Ruta = Range("J3").Value & "\" & nombre_archivo & ".txt"
 
    ultima_fila = Cells(Rows.Count, 8).End(xlUp).Row
 
    Open Ruta For Output As #1
 
    Print #1, Left(Cells(1, 1) + Space(41), 39) & _  ' -A- Este campo no se que longitud tiene, parece que es 41
                   Cells(1, 2) & _                   ' -B- Este no existe
                   Cells(1, 3) & _                   ' -C- Este tiene 2 espacios a la izquierda que o se quitan aqui o al primero
                   Cells(1, 4) & _                   ' -D- Vacio
                   Cells(1, 5) & _                   ' -E- Vacio
                   Cells(1, 6) & _                   ' -F- Fecha
            "00" & Cells(1, 7) & _                   ' -G- Le Faltan dos cero de la izquierda
                   Cells(1, 8) & " "                 ' --- Hay un espacio al final
 
    For i = 2 To ultima_fila
        Print #1, Cells(i, 1) & _
                  Cells(i, 2) & _
                  Cells(i, 3) & _
                  Cells(i, 4) & _
                  Cells(i, 5) & _
             Left(Cells(i, 6) + Space(40), 40) & _
                  Cells(i, 7) & _
                  Cells(i, 8) & "  "                 ' --- Hay dos espacios al final
    Next
    Close #1
    MsgBox (" se convirtió correctamente !")
End Sub

Saludos.
\\//_
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