vertical line on one page

  • Thread starter Thread starter Andy G
  • Start date Start date
A

Andy G

I am printing invoices and would like to split a landscape page with a
vertical line. This seems like it should be simple and maybe it is. So
far, I can not accomplish this in Access reports. Any ideas?

Thanks.
 
You can draw a line using the Line method of the report in the On Page
event. Add a rectangle in your page header with the top left corner of the
rectangle where you want your line to start. Name the rectangle "Box1". The
Box1 does not have to be visible.

Then add code to the On Page event of your report:

Private Sub Report_Page()
Me.Line (Me.Box1.Left, Me.Box1.Top)-Step(0, 20000)
End Sub
 
Duane,

Wow! That is great. I know beggars can't be choosers but can that line be 2
point with short dashes (or something close to that)? I tried setting the
properties of the box to the above with no avail.

Thanks again!
Andy
 
Private Sub Report_Page()
Me.DrawWidth = 2
Me.DrawStyle = 2
Me.Line (Me.Box1.Left, Me.Box1.Top)-Step(0, 20000)
End Sub
 
I really appreciate it! Everything is great.


Duane Hookom said:
Private Sub Report_Page()
Me.DrawWidth = 2
Me.DrawStyle = 2
Me.Line (Me.Box1.Left, Me.Box1.Top)-Step(0, 20000)
End Sub
Click to expand...
 
Back
Top