Formatting a table inside the report

Dmitry Perets

Registered User.
Local time
Today, 13:53
Joined
Jul 20, 2006
Messages
21
Hello,

I need to insert a table into some report. The simpliest way that I found to do that was to insert many text boxes, when each text box was bounded to a column of the table. This worked OK, except for one annoying problem. The problem is that some columns contain a lot of text. So they grow into several lines. But though my text boxes are totally independent, the only text box that grows is the one with a lot of text. And I want the total row to grow, like we usually see in tables.

How can I solve the problem?
 
set the textbox borders to none and add the following code

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Dim CtlDetail As Control
Dim intLineMargin As Integer


intLineMargin = 60


For Each CtlDetail In Me.Section(acDetail).Controls
With CtlDetail

Me.Line ((.left + .Width + intLineMargin), 0)-(.left + .Width + _
intLineMargin, Me.Height)

End With
Next
With Me
Me.Line (0, 0)-Step(.Width, .Height), 0, B
End With

Set CtlDetail = Nothing

End Sub
 

Users who are viewing this thread

Back
Top Bottom