Private Sub Report_Page()
Me.Line (0, 0)-(0, 14000)
Me.Line (600, 3500)-Step(0, 8600)
Me.Line (2170, 3500)-Step(0, 8600)
Me.Line (3285, 3500)-Step(0, 8600)
Me.Line (7435, 3500)-Step(0, 8600)
Me.Line (8400, 3500)-Step(0, 8600)
Me.Line (9360, 3500)-Step(0, 8600)
Me.Line (Me.Width, 0)-(Me.Width...