Quisiera colaboración para imprimir boletas de pago de manera continua a base de macros, mi correo es [email protected]

Quisiera que me ayude a imprimir boletas de pago de manera continua exactamente igual como el ayudo al anterior amigo. Se lo agradecería bastante... Saludos. Mi correo es [email protected].

El asunto es que tengo una pestaña con la boleta estructurada y programada con formulas que al cambiar solamente el nombre del trabajador se actualizan los datos respectivos, ahora quiciera que me ayude con en el anterior caso, que se vayan cambiando los nombres automaticamente e imprimiendo la boleta de pago respectiva hasta terminar con la lista de nombres que se tiene...

1 respuesta

Respuesta
1

Te anexo la macro, pero tendrás que cambiar lo siguiente:

"formato" por el nombre de tu hoja donde tienes la boleta.

"nombres" por el nombre de la hoja en donde tienes la lista de nombres

"A" Por la columna en donde tienes la lista de nombres

"F5" por la celda en donde hay que poner el nombre en la hoja de la boleta.

Sub ImprimirBoletas()
'Por.Dante Amor
    Set h1 = Sheets("formato")
    Set h2 = Sheets("nombres")
    col = "A"
    For i = 2 To h2.Range(col & Rows.Count).End(xlUp).Row
        h1.Range("F5") = h2.Cells(i, col)
        h1.PrintOut Copies:=1, Collate:=True
    Next
End Sub

Sigue las Instrucciones para un botón y ejecutar la macro

  1. Abre tu libro de Excel
  2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
  3. En el menú elige Insertar / Módulo
  4. En el panel del lado derecho copia la macro
  5. Ahora para crear un botón, puedes hacer lo siguiente:
  6. Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
  7. Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
  8. Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona: Tamaño y Propiedades. En la ventana que se abre selecciona la pestaña: Propiedades. Desmarca la opción “Imprimir Objeto”. Presiona “Cerrar”
  9. Vuelve a presionar click derecho dentro de la imagen y ahora selecciona: Asignar macro. Selecciona: pinta
  10. Aceptar.
  11. Para ejecutarla dale click a la imagen.

Si tienes problemas para adaptar la macro, envíame tu archivo me dices en qué hoja está la lista de nombre y en cuál celda tengo que poner cada uno.

Mi correo [email protected]

En el asunto del correo escribe tu nombre de usuario “Julio Cesar Orellana Meyui” y el título de esta pregunta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas