Make a Rectangle Grow with Textbox

[newbie]

I have a report that contains the fields drug name and drug cost. I have placed a rectangle behind the drug cost field so that it highlights the number. all is well until one of the drug names wraps to another line. When this happens I get a white space in the gray behind my text box. Is there a way to keep this from happening?

[slave138]

I don't know about Access 97 but in 2007 you can just set the Height & Width properties:

Me.Boxy.Height = Me.DrugCost.Height
Me.Boxy.Width = Me.DrugCost.Width

If it needs to be a little wider than the DrugCost field, just tack on the extra:

Me.Boxy.Width = Me.DrugCost.Width + 100
Me.Boxy.Height = Me.DrugCost.Height + 50

Just remember to adjust the Left and Top to account for the increased size:

Me.Boxy.Width = Me.DrugCost.Width + 100
Me.Boxy.Height = Me.DrugCost.Height + 50
Me.Boxy.Left = Me.DrugCost.Left - 50 'half of the increased width
Me.Boxy.Top = Me.DrugCost.Top - 25 'half of the increased height

You will probably want to associate the code with whatever action changes the DrugCost field.

I forgot I was in the Reports section - this may only work on forms... Sorry.

[slave138]

You might find this helpful:

http://www.lebans.com/textwidth-height.htm