[AccessD] Access 2007 question

David McAfee davidmcafee at gmail.com
Wed Aug 25 15:38:53 CDT 2010

Are you trying to make boxes/borders around the fields, so all of the
boxes in a given row are the same height?

Much like an Excel spread sheet that has word wrap turned on for a given field.

If so, take all of your borders off of the cells in question. tag
all of the cells in the row  with something such as "grid" then place the
following code in the report detail's OnFormat event:

Dim ctl As Control
  Me.ScaleMode = 5
  For Each ctl In Me.Controls
    If ctl.Tag = "grid" Then
        Me.Line ((ctl.Left / 1440), 0)-((ctl.Left / 1440), 10)
        Me.Line (((ctl.Left + ctl.Width) / 1440), 0)-(((ctl.Left +
ctl.Width) / 1440), 10)
    End If
  Next ctl

You will have to make a horizontal line above and below the row as well.

David McAfee

On Wed, Aug 25, 2010 at 12:17 PM, Debbie <delam at zyterra.com> wrote:
> I am putting together a report in access 2007. The footer has several
> rows of calculated fields and the detail has the fields calculated from.
> Visually, I am trying to make all of the rows space the same in the
> detail and footer so they all look like a continuous section. My
> problem is that the detail section is visually further apart than the
> manual rows in the footer. I have reduced the height if the detail
> section to .1354" and the footer rows are .1667" top to top, and the
> details still look farther apart.
> I really need the vertical real estate, so increasing the spacing in
> the footer is not an option. Any ideas where thus extra space is
> coming from?  And most importantly how to get rid of it?
> Debbie
> Sent from my iPhone
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com

More information about the AccessD mailing list