Note: The other languages of the website are Google-translated. Back to English

¿Cómo imprimir varias copias con números de página de secuencia?

¿Alguna vez ha intentado imprimir varias copias de una hoja con números de página de secuencia? Eso significa imprimir 10 copias de una hoja y llenar la celda A1 en la primera copia con 1, en la segunda copia con 001… y en la décima copia con 2. En Excel, no hay una función incorporada que pueda resolver este trabajo, pero en este artículo, presento un código de macro para ayudarlo a imprimir rápidamente varias copias con el número de página de secuencia en Excel.

Imprima copias con diferentes números por código VBA


flecha azul burbuja derecha Imprima copias con diferentes números por código VBA

Siga los pasos a continuación para imprimir varias copias de una hoja con números de secuencia por código VBA

1. Habilite la hoja que desea imprimir y presione las teclas Alt + F11 para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic en recuadro > Móduloy pegue el código siguiente en el Módulo guión. Ver captura de pantalla:

VBA: imprime copias con números de página de secuencia.

Sub PrintCopiesWithNumbers()
'UpdatebyEntendoffice20161031
    Dim i As Integer
    Application.ScreenUpdating = False
    For i = 1 To 10
        Range("A1").Value = "'00" & i
       ActiveSheet.PrintOut
    Next i
    Application.ScreenUpdating = True
    MsgBox "Totally print" & (i - 1) &"copies", vbInformation, "Kutools for Excel"
End Sub

doc imprimir copia con el número 1

Nota:: en el código, A1 es la celda en la que desea colocar el número de secuencia, Para 1 10 indica imprimir 10 copias, y "'00" y yo es el formato de secuencia, puede cambiarlos cuando lo necesite.

3. Prensa F5 para ejecutar el código, y aparece un cuadro de diálogo para recordarle que debe imprimir 10 copias. Hacer clic OK para cerrar el cuadro de diálogo, cada copia impresa tiene su propio número de secuencia.
doc imprimir copia con el número 2


Las mejores herramientas de productividad de oficina

Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%

  • Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
  • Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
  • Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
  • Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
  • Más de 300 potentes funciones. Compatible con Office/Excel 2007-2021 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Funciones completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
officetab parte inferior
Comentarios (15)
Aún no hay calificaciones. ¡Sé el primero en calificar!
Este comentario fue minimizado por el moderador en el sitio
¿Qué es el formato de secuencia?
Este comentario fue minimizado por el moderador en el sitio
Hola, la secuencia se refiere al número de copias.
Este comentario fue minimizado por el moderador en el sitio
Hola,
Estaba buscando este tipo de código pero con un giro...
Al imprimir 10 copias, debe decir cuántos son. Ej. 001 de 010 y así sucesivamente ..
¿Alguna ayuda?
Este comentario fue minimizado por el moderador en el sitio
Lo siento, no tengo idea.
Este comentario fue minimizado por el moderador en el sitio
¿Encontraste alguna ayuda en esto? buscando lo mismo
Este comentario fue minimizado por el moderador en el sitio
cuando presiono f5 no pasa nada que hacer?
Este comentario fue minimizado por el moderador en el sitio
vaya al elemento de menú Ejecutar y haga clic manualmente en ejecutar.
Este comentario fue minimizado por el moderador en el sitio
Vaya a la cinta de opciones de la ventana Aplicaciones de Microsoft Visual Basic y haga clic en Ejecutar.
Este comentario fue minimizado por el moderador en el sitio
Gracias !! es útil y mi trabajo está hecho :)
Este comentario fue minimizado por el moderador en el sitio
Gracias, muy útil. Pero necesito imprimir 2 números secuenciales en 1 página. ¿Poder ayudar?
Este comentario fue minimizado por el moderador en el sitio
Lo siento, no entiendo tus requerimientos.
Este comentario fue minimizado por el moderador en el sitio
¿Cómo puedo guardar la secuencia de copias en un archivo pdf? ¡Gracias! 
Este comentario fue minimizado por el moderador en el sitio
Estoy usando esto con MS Word, y cuando lo ejecuto, aparece un cuadro de mensaje "Error de compilación, sub o función no definida"
Este comentario fue minimizado por el moderador en el sitio
Hola, Fish, este código está disponible en MS Excel, no en Word.
Este comentario fue minimizado por el moderador en el sitio
Estoy trabajando en una lista de verificación. La columna C y la columna M son mis columnas con números de secuencia. Quiero que se actualicen cada vez que imprima y continúe hasta 950. Entonces, una hoja contiene 1 - 60. Necesitaría imprimir 16 páginas una vez que descubra cómo obtener esas columnas C10: C39 y M10: M39 para continuar actualizándose con cada impresión. ¿Puedes ayudar?
No hay comentarios publicados aquí todavía
Deje sus comentarios
Publicar como invitado
×
Califica esta publicación:
0   Personajes
Ubicaciones sugeridas

Seguinos

Copyright © 2009 - www.extendoffice.com. | Reservados todos los derechos. Energizado por ExtendOffice, | Mapa del Sitio
Microsoft y el logotipo de Office son marcas comerciales o marcas comerciales registradas de Microsoft Corporation en los Estados Unidos y / o en otros países.
Protegido por Sectigo SSL