Report Detail field (Rows) WON'T grow together

[disneygoof via AccessMonster.com]

I have a report with multiple columns, which creates multiple rows. Some of
the columns are dates, but others are memo and text fields. When a memo or
text field exceeds 1 line and grows, how can I get all the other columns to
grow equally. I want this so the report LOOKs like a grid pattern...like
excel. Any thoughts? Can this be done? I have tried a number of things,
but nothing works.
Thanks
David.

 

[Guest]

I am not sure how you have your lines set up.
1. If your text boxes have lines, remove them.
2. Instead, in design view, draw a horizontal line at the bottom of your
detail section. Then also draw vertical lines between each column.

If you play with this, it might work for you.
Angie

 

[disneygoof via AccessMonster.com]

Thanks Angie. I tried that and had trouble getting the vertical lines to
work. I got it to work over the weekend using the following code...in the
'OnPrint Detail Section' of my report..

This gave me the desired result...except for the vertical lines, but that's
OK, it looks nicer this way.

Thank you!

'variable setup
Dim rpt As Report, lnColor As Long
Dim lnTop As Single, lnLeft As Single
Dim lnwidth As Single, lnHeight As Single

'fill setup
Me.FillColor = vbYellow
Me.FillStyle = 0

'report set
Set rpt = Me

'scale setup - detail section
rpt.ScaleMode = 5
lnTop = rpt.ScaleTop
lnLeft = rpt.ScaleLeft
lnWidth = rpt.ScaleWidth
lnHeight = rpt.ScaleHeight + 1
lnColor = RGB(0, 0, 0)

'action
If Me.Completed.Value = True Then
Me.FillColor = vbYellow
Me.FillStyle = 0
rpt.Line (lnTop, lnLeft)-(lnWidth, lnHeight), lnColor, B
End If
If Me.Cancelled.Value = True Then
Me.FillColor = vbGreen
Me.FillStyle = 7
rpt.Line (lnTop, lnLeft)-(lnWidth, lnHeight), lnColor, B
Else
Me.FillColor = vbWhite
Me.FillStyle = 1
rpt.Line (lnTop, lnLeft)-(lnWidth, lnHeight), lnColor, B
End If

I am not sure how you have your lines set up.
1. If your text boxes have lines, remove them.
2. Instead, in design view, draw a horizontal line at the bottom of your
detail section. Then also draw vertical lines between each column.

If you play with this, it might work for you.
Angie

I have a report with multiple columns, which creates multiple rows. Some of
the columns are dates, but others are memo and text fields. When a memo or

[quoted text clipped - 4 lines]

Thanks
David.