Imprimier reporte Horizontal

[alexiscespedes]

Hola amigos, necesito imprimir un formulario pero es muy ancho, no me cabe en la pagina en forma vertical, hay alguna forma para imprimirlo en forma horizontal como lo haria con excel? ademas como hago para indicarle al sistema donde comienze a imprimir y que el margen superior me baje un poco ya que siempre me imprime casi en el borde superior. no se como se programan los margenes. Si alguien me puede ayudar le agradecere mucho. Saludos

[Avellaneda]

Iniciado por alexiscespedes

Hola amigos, necesito imprimir un formulario pero es muy ancho, no me cabe en la pagina en forma vertical, hay alguna forma para imprimirlo en forma horizontal como lo haria con excel? ademas como hago para indicarle al sistema donde comienze a imprimir y que el margen superior me baje un poco ya que siempre me imprime casi en el borde superior. no se como se programan los margenes. Si alguien me puede ayudar le agradecere mucho. Saludos

Hola,

Si te refieres a un DataReport puedes utilizar las propiedades Orientation y TopMargin del objeto.

[seba123neo]

por las dudas...si no me equivoco para usar la propiedad Orientation debes tener el ultimo sevice pack de visual basic instalado...

saludos.

[alexiscespedes]

No es un DataReport, es un formulario que tengo en pantalla y necesito imprimirlo, para ello utilizo Me.PrintReport, pero me lo imprime solamente vertical y yo necesito imprimirlo horizontal. Trate de hacerlo con Crystal Report XI pero no puedo hacer que me acepte una base de datos txt por eso lo hice en un formulario. Yo no tengo el ultimo service pack de visual instalado en mi pc. no se si habra otra forma de imprimirlo. Si alguien la conoce y me ayuda le agradesco. Saludos

[Txoco]

Prueba con Printer.Orientation entonces.

Si te funciona, el area de impresión la defines con las propiedades ScaleLeft, ScaleTop, ScaleWidth y ScaleHeight, también del objeto Printer.

[alexiscespedes]

Hola Txoco y otros amigos, por ahi me encontre este codigo, lo use y me envia a office oneNote aqui si me permite escoger el tipo de impresion vertical u orizontal, pero es un poco mas lento el asunto ya que no me hace la impresion directa, sin embargo del ahogado el sombrero. Si tenes alguna sugerencia con respecto al mismo aqui te lo mando para que lo veas. Gracias

Dim instance As Printer
Private Sub Command1_Click()
'Dim Printer As New Printer
If Printer.Height > Printer.Width Then
Printer.Orientation = vbPRORPortrait
Else
Printer.Orientation = vbPRORLandscape
End If
Me.PrintForm

End Sub

[seba123neo]

haber si entendi, vos estas trabajando con el ocx de crystal report desde el formualrio? y queres imprimir el reporte mismo?

[alexiscespedes]

No yo estoy trabajando en un formulario normal de vb. lo que quiero es poder imprimirlo en forma horizontal porque el mismo es muy ancho y no me cabe en la pagina si lo hago en forma vertical. uso el comando Me.PrintForm pero al usar el codigo anterior me habre una pagina de office oneNote y ahi si me permite imprimirlo pero para el usuario del programa le es mas lento porque el tiene que elegir la forma de impresion y otras cosas que se supone deberian estar programadas previamente. Baje el ultimo service Pack de vb pero no se como utilizarlo para darle la orientacion de impresion. En mi pc de la casa si me esta enviando a la pagina de oneNote pero en la oficina no, simplemente me imprime el formulario en forma horizontal pero cortado. Alguna otra idea?