tranvy > 11-07-14, 10:49 AM
MTNQ > 14-07-14, 07:13 AM
Private Sub Report_Page()
Const conTwipsPerCm As Long = 567 'voi don vi cm, neu tinh inch thì = 1440
If Me.Page Mod 2 = 0 Then 'Trang chẵn
Me.Printer.LeftMargin = 2 * conTwipsPerCm 'Thay đổi số 2 theo ý bạn nhé
Else
Me.Printer.LeftMargin = 2.5 * conTwipsPerCm 'Thay đổi số 2,5 theo ý bạn nhé
End If
End Sub