How to make a txtbox not visible
This is a top of the head guess (I'm about to go to sleep, so I didn't test
it); try replacing your With/End With block of code with this instead and
see if it works for you...
With ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) = True Then
SelCount = SelCount + 1
UserForm1.Controls("Label" & SelCount).Caption = .List(i)
UserForm1.Controls("TextBox" & _
CStr(SelCount)).Visible = True
End If
Next
For i = SelCount + 1 To 10
UserForm1.Controls("TextBox" & CStr(i)).Visible = False
Next
End With
Rick
"Jennifer" wrote in message
...
Ok my reply wasn't total right. If i put text in the label properties
(caption) it works . . . but (there is always a but) when i use this code
to
fill the labels it doesn't work. Hmmm
Private Sub cmdSelect_Click()
Dim i As Long
Dim SelCount As Long
With ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) = True Then
SelCount = SelCount + 1
UserForm1.Controls("Label" & SelCount).Caption = .List(i)
End If
Next
End With
UserForm1.Show
Unload Me
--
Thank you,
Jennifer
"Nigel" wrote:
Something like....
If Len(Trim(Label1.Caption)) 0 then
TextBox1.Visible = True
Else
TextBox1.Visible = False
Endif
--
Cheers
Nigel
"Jennifer" wrote in message
...
Hello Hello,
How do i make a textbox only visible if the label has a value in it.
Example
might be in vba there are 10 labels and 10 textboxes. When i activate
the
form and i have it only three labels fill with information i only want
to
see
txtboxes 1,2,3, to be visible. Need lots of direction . . . thanks.
--
Thank you,
Jennifer
|