Hola tengo una macro que imprime y enumera, lo que quiero es lograr que esta macro realice la misma funcion pero en la columna T tengo datos los cuales tienen nomenclatura y en la columna U un valor el debe incrementarse en la medida que imprimo, para esto envío los datos gracias.

PRUEBA.rar

Hola tengo una macro que imprime y enumera, lo que quiero es lograr que esta macro realice la misma funcion pero en la columna T tengo datos los cuales tienen nomenclatura y en la columna U un valor el debe incrementarse en la medida que imprimo, para esto envío los datos gracias.

Que tal

Aquí te envio un gran aporte de Gerson Pineda, espero que logreas adaptarla a tu archivo.

Si logras adaptarla, sube el archivo para ver como te quedó.

Saludos

Prefijo automatico para compañias_GP.zip

AGRADEZCO TU AYUDA PERO ENVÍO NUEVAMENTE EL ARCHIVO CREO QUE NO ME EXPLIQUE BIEN EN LA PRIMERA PREGUNTA

PRUEBA.rar

Hola @[uSER=61494]trabaj2010[/uSER]. Prueba cambiando tu código por este:

Sub imprimir_y_numerar()

    ActiveSheet.PrintOut copies:=2

    celda = Application.WorksheetFunction.Match(Range("H5"), Range("T1:T15"), 0)

    Range("u" & celda).Value = Range("u" & celda).Value + 1

End Sub

[/CODE]

Recuerda hacer clic en "Me gusta" en la (o las) respuesta(s) que te ayudó (ayudaron) a resolver tu duda. Espero haberte ayudado, Dios te bendiga!

gracias excelente la solución agradezco tu gran aporte;)

Me alegra haber podido ayudar. Tema Solucionado.