Impresión de hoja según variable
Hola, me gustaría saber cómo puedo hacer para que, creando un Command Button, éste me imprima una o varias hojas del libro según una variable, es decir, si en la celda de la variable me da 3 (por ejemplo) me imprima la hoja 3, pero si me da 6 me imprima la hoja 9 y la 14, y así con el resto de variables.
Las hojas a imprimir no serán nunca las hojas activas, ya que en la primera hoja del libro es donde se creará el botón de impresión, y donde hay una especie de formulario donde se cubrirán los datos necesarios.
Me gustaría además que la hoja visible sea siempre la primera hoja, es decir, que cuando pulse el botón de impresión, no vaya a la hoja u hojas que tendrá que imprimir y que después vuelva a la hoja1.
Espero haberme expresado con claridad
Muchas gracias.
Un saludo.
Las hojas a imprimir no serán nunca las hojas activas, ya que en la primera hoja del libro es donde se creará el botón de impresión, y donde hay una especie de formulario donde se cubrirán los datos necesarios.
Me gustaría además que la hoja visible sea siempre la primera hoja, es decir, que cuando pulse el botón de impresión, no vaya a la hoja u hojas que tendrá que imprimir y que después vuelva a la hoja1.
Espero haberme expresado con claridad
Muchas gracias.
Un saludo.
Respuesta
1
Es básico asumiendo que tienes algún conocimiento de VBA, cualquier cosa comentas
Sub CommandButton_Click()
if Range("A1").Value = 3 Then
Sheets("Hoja3").PrintOut
elseif range("A1").Value = 6 then
Sheets("Hoja9"). PrintOut
Sheets("Hoja14"). PrintOut
Endif
End Sub
Está bien compacto, cualquier cosa comentas
Saludos
Gustavo
End Sub
Sub CommandButton_Click()
if Range("A1").Value = 3 Then
Sheets("Hoja3").PrintOut
elseif range("A1").Value = 6 then
Sheets("Hoja9"). PrintOut
Sheets("Hoja14"). PrintOut
Endif
End Sub
Está bien compacto, cualquier cosa comentas
Saludos
Gustavo
End Sub