greaseman
Closer to seniority!
- Local time
- Today, 15:49
- Joined
- Jan 6, 2003
- Messages
- 360
I have a report that contains several columns of data, and I would like to change the widths of some of the vertical lines on the report, but not all of the vertical lines on the report.
For example, If my CtlDetail is "widget" or "wadget," I would like to place bold vertical lines around those columns, while leaving all other columns their regular thickness.
Any ideas or suggestions would be welcomed with open arms.
Here is the code I currently have for the detail print portion of the report:
For Each CtlDetail In Me.Section(acDetail).Controls
contrlname = CtlDetail.Name
With CtlDetail
If CtlDetail.Name = "Notes" Then
GoTo skipDrawingLines
End If
Me.Line ((.Left + .Width + intLineMargin), 0)-(.Left + .Width + intLineMargin, Me.Height)
skipDrawingLines:
End With
Next
With Me
Me.Line (0, 0)-Step(.Width, .Height), 0, B
End With
Set CtlDetail = Nothing
Thanks for your assistance....looking forward to your replies!
For example, If my CtlDetail is "widget" or "wadget," I would like to place bold vertical lines around those columns, while leaving all other columns their regular thickness.
Any ideas or suggestions would be welcomed with open arms.
Here is the code I currently have for the detail print portion of the report:
For Each CtlDetail In Me.Section(acDetail).Controls
contrlname = CtlDetail.Name
With CtlDetail
If CtlDetail.Name = "Notes" Then
GoTo skipDrawingLines
End If
Me.Line ((.Left + .Width + intLineMargin), 0)-(.Left + .Width + intLineMargin, Me.Height)
skipDrawingLines:
End With
Next
With Me
Me.Line (0, 0)-Step(.Width, .Height), 0, B
End With
Set CtlDetail = Nothing
Thanks for your assistance....looking forward to your replies!