Experts Exchange connects you with the people and services you need so you can get back to work.
Broken down into practical pointers and step-by-step instructions, the IT Service Excellence Tool Kit delivers expert advice for technology solution providers. Get your free copy now.
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim i As Integer
For i = 1 To 10
If Len(Me.Controls("Patient_Progress_Notes_" & i)) > 0 Or Len(Me.Controls("Time_" & i)) > 0 Then
Me.Controls("line" & i).Visible = True
Me.Controls("line" & i).Visible = False
Open in new window
you will need to adjust the properties so that all the controls are set to can grow and can shrink = yes.
You will probably also need to get rid of the separator line since unless you want to write code, there is no way to suppress that.
Try using borders on the controls rather than lines between them
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment
From novice to tech pro — start learning today.
Premium members can enroll in this course at no extra cost.