Ajustar Pagebreak para VFP

hola, Alonso !

__ 1 __

... hice una macros para obtener el codigo de cambiar la posicion horizontal de pagebreaks pero al... implenatrlo me da problemas o errores.
... la idea es que puedo imprimir una Tabla ya hecha por Automatizacion desde VFP en un sola Pagina.

__ 2 __

O en su defecto como puedo hacer para que al momento de imprimir lo haga como duplex, (esto no se graba en la macro)

Sub Macro1()
Set ActiveSheet.HPageBreaks(1).Location = Range("A56")
ActiveWindow.SmallScroll Down:=-9
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

1) si lo [unico] que quieres es *ajustar* la impresion de la hoja activa a una sola pagina -?-
prueba con algo +/- como lo siguiente:

With ActiveSheet
With .PageSetup
.FitToPagesWide = 1
.FitToPagesTall = 1
End With
.PrintOut
End With

2) por lo referente a impresiones *a doble cara* [y hasta donde se]...
la caracteristica para impresiones a doble cara es particular de la impresora [y su driver]
si lo que buscar es 'manipular' dicha caracteristica a traves de codigo vba...
vas a necesitar de apoyarte en llamadas a las API's de windows [y bastantes lineas de codigo] +/- como sigue:
-> http://support.microsoft.com/defaul...-us;230743

-> la otra alternativa es que configures una 'copia' de dicha impresora y la dejes [por omision] con impresion duplex
[con la ventaja de que podras utlizarla desde cualquier otra aplicacion] dirigiendo la salida a esa copia de la impresora ;)
-> ademas, si dicho documento lo vas a imprimir SIEMPRE usando la misma impresora...
-> dirigiendo la salida a esa copia de la impresora y guardando los cambios en el archivo sera la primera que intente usar ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

gracias por la respuesta vere el tema de la impresora con caracteristicas
pre grabadas...

"Héctor Miguel" wrote in message
news:

hola, Alonso !

__ 1 __

... hice una macros para obtener el codigo de cambiar la posicion
horizontal de pagebreaks pero al... implenatrlo me da problemas o
errores.
... la idea es que puedo imprimir una Tabla ya hecha por Automatizacion
desde VFP en un sola Pagina.

__ 2 __

O en su defecto como puedo hacer para que al momento de imprimir lo haga
como duplex, (esto no se graba en la macro)

Sub Macro1()
Set ActiveSheet.HPageBreaks(1).Location = Range("A56")
ActiveWindow.SmallScroll Down:=-9
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

1) si lo [unico] que quieres es *ajustar* la impresion de la hoja activa a
una sola pagina -?-
prueba con algo +/- como lo siguiente:

With ActiveSheet
With .PageSetup
.FitToPagesWide = 1
.FitToPagesTall = 1
End With
.PrintOut
End With

2) por lo referente a impresiones *a doble cara* [y hasta donde se]...
la caracteristica para impresiones a doble cara es particular de la
impresora [y su driver]
si lo que buscar es 'manipular' dicha caracteristica a traves de codigo
vba...
vas a necesitar de apoyarte en llamadas a las API's de windows [y
bastantes lineas de codigo] +/- como sigue:
-> http://support.microsoft.com/defaul...-us;230743

-> la otra alternativa es que configures una 'copia' de dicha impresora y
la dejes [por omision] con impresion duplex
[con la ventaja de que podras utlizarla desde cualquier otra
aplicacion] dirigiendo la salida a esa copia de la impresora ;)
-> ademas, si dicho documento lo vas a imprimir SIEMPRE usando la misma
impresora...
-> dirigiendo la salida a esa copia de la impresora y guardando los
cambios en el archivo sera la primera que intente usar ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.