Predmet:Re: pomijeranje controla na reportu

---

Pa ako hoče da podesi gornje i desne margine, znači da podesi, napravi se jedna tabela sa poljima,
dokument , gornja, ljeva .
U polju dokument se upiše naziv Reporta, a u polja ljeva , desna, koliko da milimetara pomakne ispis.
Napravis i formu u kojoj može korisnik mijenjati parametre ispisa. Postavim je poslije.

A na samom reportu na ON_Open postaviš ovako.

Private Sub Report_Open(Cancel As Integer)
gornjam = DLookup("gornja", "tblmargine", "dokument='PUTNI NALOG'")
lijevam = DLookup("lijeva", "tblmargine", "dokument='PUTNI NALOG'")

If IsNull(gornjam) Or gornjam = "" Then
Else
Printer.TopMargin = 56.7 * gornjam
End If
If IsNull(lijevam) Or lijevam = "" Then
Else
Printer.LeftMargin = 56.7 * lijevam
End If

End Sub

Pozdrav