Modificar por código la margen de página del informe

Cordial saludo.
Necesito modificar la margen superior de la página del informe a partir de un valor en una caja de texto
Gracias por tu ayuda

1 Respuesta

Respuesta
1
Aquí tienes un ejemplo, al abrir el informe desde un formulario introduce este código te imprimirá con los margenes que le digas. Para poner el valor de la caja de texto sustituye el valor por ME. Nombredelacaja
DoCmd. OpenReport "Formulario1", acViewDesign,,, acHidden
With Printer
.LeftMargin = 25
.RightMargin = 25
.BottomMargin = 1
.TopMargin = 1
.Orientation = acPRORLandscape
End With
Reports("Formulario1").Printer = Printer
DoCmd. Close acReport, "Formulario1", acSaveYes
DoCmd. OpenReport "Formulario1"

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas