Botón para imprimir

En el libro tengo una primera hoja de datos y luego en las siguientes hojas (5) está lo que sería el proyecto que quiero imprimir.
Necesitaría crear un botón en la hoja de datos que me permitiera imprimir las hojas que seleccionara.
He leído en algunos lugares lo de crear una macro pero no tengo ni idea de como realizarlo.
Agradecería vuestra ayuda. Tengo EXCEL 2010
Gracias
{"lat":39.462637618999,"lng":-0.365853309631348}

1 respuesta

1
Respuesta de
Hola, create un botón de comando y agregale lo siguiente:
Private Sub CommandButton1_Click()
'mostrar un inputbox para ingresar datos
Dim pagina As String
pagina = InputBox("Ingrese número de pagina a imprimir", "IMPRIMIR")
'si el dato es igual a "..." entonces ...
If pagina = "1" Then
Sheets("hoja2").Select  'se situa en la hoja2
ActiveWindow.SelectedSheets.PrintOut Copies:=1  
else
If pagina = "2" Then
Sheets("hoja3").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1 
else
If pagina = "3" Then
Sheets("hoja4").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1 
else
If pagina = "4" Then
Sheets("hoja5").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1 
Else
MsgBox "Ese número de página no existe", vbExclamation, "PAGINA INCORRECTA"
End If
End If
End If
End If
End Sub
Y así, tantas condicionales "if" como necesites.
Espero que te sirva.
Saludos
Añade un comentario a esta respuesta
Añade tu respuesta
Haz clic para o
Escribe tu mensaje
¿No es la respuesta que estabas buscando? Puedes explorar otras preguntas del tema Microsoft Excel o hacer tu propia pregunta: