Algún comando vba para generar vista previa de planilla excel
Hola Dante, quería preguntarte si me podrías ayudar, mi idea es crear un botoncito para generar vista previa de mi planilla de recibo, el cual deseo imprimirlo, pero quiero generarlo a través de un botón de comando, ¿sabrías cuál es el código para generar vista previa en pantalla? Si me podrías ayudar por favor, muchas gracias.
1 respuesta
Respuesta de Dante Amor
1
Este es la parte para visualizar
For i = 2 To h2.Range("A" & Rows.Count).End(xlUp).Row
For j = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(j) Then
If h2.Cells(i, "A") = ListBox1.List(j) Then
h1.[G13] = h2.Cells(i, "C")
h1.[C13] = h2.Cells(i, "R")
h1.[E7] = CONVERTIRNUM(h2.Cells(i, "R"), False)
h1.Rows(1 & ":" & 15).Copy h7.Range("A" & u)
u = u + 16
h7.HPageBreaks.Add Before:=h7.Range("A" & u)
End If
End If
Next
Next
Select Case opcion
Case "impresora"
If MsgBox("La impresora está preparada:", vbYesNo, "") = vbYes Then
h7.PrintOut Copies:=1, Collate:=True
End If
Case "recibo"
UserForm2. Hide
H7. PrintPreview
H3. Activate
UserForm2.Show
