Macro para imprimir con codncion

Tengo 4 hojas las cuales todas tienen una celda en especifica que tiene un dato diferente

La celda es la A1000 ahí tienen un dato según la hoja IMPRESIÓN

Ejemplo la hoja1 tiene en A1000 el dato semana 1

La hoja2 tiene en la A1000 el dato semana 2 así hasta llegar ala cuarta hoja

En la hoja de impresión tengo 4 distintos códigos diferentes osea áreas de impresión

Lo que necesito es que si estoy posicionado en la hoja1 y este reconoce el dato a1000 (semana 1 ) de la hoja de impresión entonces se active para imprimir

Y así para las otras

El punto es que lo quisiera meter en su solo botón

Que reconozca en que hoja estoy e imprima el área de impresión según la hoja

1 respuesta

Respuesta
2

No queda claro donde colocar las instrucciones de comparación. Te dejó un par de líneas y si no podes completar tu macro de impresión dejala escrita aquí para ajustarla.

Sub botón_macro()

Select case activesheet.name

Case is = "Hoja1"

Call imprimeRgo1

Case is = "Hoja2"

Call imprimeRgo2

'repetir con el resto de hojas

End Select

End Sub

Lo que hará este botón es llamar a la macro que corresponda según la hoja.

Comenta si esto resuelve tu consulta sino deja escrito tu código para ajustarlo.

Sdos!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas