Hola;
por lo menos lo realizo de la siguiente manera:
'Ver documento antes de imprimir
If optVista.Value = True Then
.Worksheets.PrintPreview
End If
Set ApExcel = Nothing
Tengo dos Option, Ver documento y Vista preliminar.
No se si es lo que buscas.
Nos vemos