Macro Print Preview

Tengo un problema con una macro y es el siguiente: Cuando le doy click al botón para ir a ver la vista previa de impresión, el programa se bloquea y no me permite decidir imprimir, el código que tengo es el siguiente:
Private Sub CommandButton2_Click()
ActiveWindow.SelectedSheets.PrintPreview
End
UserForm1.Hide
X = MsgBox("Desea Imprmir?", vbYesNo + vbQuestion)
If X = vbYes Then
CommandButton3.Enabled = True
Else
If X = vbNo Then
UserForm1.Show
CommandButton1.Enabled = False
CommandButton2.Enabled = False
CommandButton3.Enabled = False
End If
End If
End Sub
Private Sub CommandButton3_Click()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

1 Respuesta

Respuesta
1
Probá con estos cambios. Como estas rutinas son solo un parcial de otras que seguramente tiene tu form, quizás debas ajustar qué hacer cuando la respuesta es no, yo por ahora le dí el foco a un Textbox1.
Private Sub CommandButton2_Click()
UserForm1.Hide
ActiveWindow.SelectedSheets.PrintPreview
X = MsgBox("Desea Imprimir?", vbYesNo + vbQuestion)
If X = vbYes Then
UserForm1.CommandButton3.Enabled = True
Else
UserForm1.CommandButton1.Enabled = False
UserForm1.CommandButton2.Enabled = False
UserForm1.CommandButton3.Enabled = False
UserForm1.TextBox1.SetFocus 'OPCIONAL
End If
UserForm1.Show
End Sub
La del CommandButton3 queda igual
Saludos
Elsa
*No te pierdas las novedades de nbre de:
http://es.geocities.com/lacibelesdepunilla/manual_VBA

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Botón siguiente y anterior en formulario excel.

Gracias a un experto estoy dando un toque más agradable a un programa de fórmulas medicas, funciona así, para guardar la información tengo un formulario donde dígito el numero de identificación, nombre, medicamentos etc. Y guardo el contenido del...
1 respuesta

Habilitar commandbutton vba

El dia de hoy traigo una nueva pregunta... Cree un código en el al abrir un userform1 me deshabilita un commandbutton1, y para habilitarlo le debo dar clic en otro CommandButton2, al darle clien en el commandbutton2 me muestra otro userform2 en el...
1 respuesta

Como posicionar un msgbox

En una macro dónde busco unas claves, al encontrar la clave saco un msgbox con una pregunta, pero los msgbos salen, en principio, en el centro de la pantalla, ¿Se pueden posicionar los msgbox? Y si se pueden ¿Cómo?
3 respuestas

Como cambiar esta parte del código

Amigo esperto melodiando por aqui tambien logre encontrar este ejemplo para usar un formulario con usuario y clave En el ThisWorkbook utilizo esto según el ejemplo que aparece en este página de todoexpertos Private Sub Workbook_Open()...
1 respuesta

Revisar data ingresada en formulario excel anteriormente para Dante Amor

El formulario que estoy trabajando es como un registro de venta que te permite registrar nueva venta haciendo clic en un commandbutton que dice NUEVA VENTA luego vienen 5 ventanas con todo el detalle de la venta entonces por ejemplo si hacemos clic...
1 respuesta

Macro de usuario y contraseña

Necesito un favorsote. Lo que pasa es que quiero una macro donde al introducir su nombre de usuario y contraseña les de acceso al libro de excel. Me gustaría que esta ontraseñas estuvieran en una hoja de excel y saber cuando entro uno de ellos. ¿Se puede?
2 respuestas

Si se deja un Textbox en blanco

Tengo este código en un formulario de excel: Private Sub TextBox1_Change() largo_entrada = Len(Me.TextBox1) Select Case largo_entrada Case 2 Me.TextBox1.Value = Me.TextBox1.Value & "/" Case 5 Me.TextBox1.Value = Me.TextBox1.Value & "/2008"...
2 respuestas

Código vba para autoajustar un userform

Mi pregunta es si existe la posibilidad que mediante código vba en excel pueda autoajustar un formulario y los objetos al tamaño de la pantalla automáticamente tan pronto se despliegue el formulario. Realmente les agradezco su colobaracion y espero...
1 respuesta

Código para mostrá datos en un comboxbox

Necesito un código que me permita llenar un combo box con los datos de una base de datos del campo nombre de la tabala empleados.. Que el combo se autocomplete cuando coloque una letra dentro del combo mostrando todas las coincidencias
1 respuesta

Crear Formulario Excel (ayuda a un principiante)

Gurús del excel, estoy trabajando en un formulario de ingreso de datos y mi intención es aprender todo sobre la herramientas de formularios. El objetivo del formulario es entregar un código al usuario que lo ejecute y almacenar en otra hoja los datos...
1 respuesta