Como foliar documentos en blanco
Necesito Foliar de Forma automática unas 500 hojas.-
Estas deben tener en la esquina superior izquierda el nombre domicilio rut dirección y en la parte superior derecha Folio N° 000001 y consecutivamente hasta el 500 o más.-
Existe una Macro o para decir algo así " Imprime 500 hojas (con membrete) y que todas sean números consecutivos 1 al xxx. Y luego del xxx1 al xxxx.-
Trabajo con excel 2013 he probado otras fórmulas como poner pie de página y repetir las filas superiores, pero no me resulta aun. Debo imprimir una por una o hacer las 500 hojas, he visto algunos artículos de la página pero tampoco me han resultado puesto que se debe imprimir de uno en uno para que cambie el contador.-
Hay alguna otra solución o alguna recomendación a usar.
1 respuesta
Haber si entendí.
Tienes un formato en una hoja, ¿quieres imprimir ese formato 500 veces y en cada hoja impresa vaya cambiando el número de folio?
Si es así utiliza la siguiente macro:
Sub imprimir()
For i = 1 To 5
Range("F1").Value = "Folio N° " & Format(i, "000000")
ActiveSheet.PrintOut
Next
End SubCambia el 5 por el número de hojas que desees imprimir.
Cambia F1 por la celda donde quieres poner el número de folio.
Si además los datos de "nombre domicilio rut dirección", también quieres que vayan cambiando, me tienes que decir si esos datos están en otra hoja, en qué columnas, y qué celdas quieres poner cada dato.
Sería más práctico si lo explicas utilizando imágenes.
'.[Sal u dos. Dante Amor. No olvides valorar la respuesta. '.[Avísame cualquier duda
'
.
]
Realice lo que dijo, y no se como activar la macro que me señalo, voy a imprimir normal y nada
Me faltaron las indicaciones:
Sigue las Instrucciones para un botón y ejecutar la macro
- Abre tu libro de Excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- En el menú elige Insertar / Módulo
- En el panel del lado derecho copia la macro
- Ahora para crear un botón, puedes hacer lo siguiente:
- Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
- Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
- 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”
- Vuelve a presionar click derecho dentro de la imagen y ahora selecciona: Asignar macro. Selecciona: pinta
- Aceptar.
- Para ejecutarla dale click a la imagen.
sal u dos
