Hi,
I am having a small issue in a code. I have the following loop:
I have three labels (Label1, Label2 and Label3).
Dim I As Integer If ComboBox.Value = "Paid" Then For I = 1 To 3 Label& I.Visible = False Next I End if
My issue is in joining Label with the I of the loop !
Thank you for your help,
Charles
Hi,
I'm not sure if you can do that, but here's a workaround.Sub test() If ComboBox.Value = "Paid" Then Label1.Visible = False Label2.Visible = False Label3.Visible = False End If End Sub
Thank you for your fast answer. I wanted to make the code shorter using the "for... next" loop but it's fine like this.
Bye,
Charles
Anther way
Private Sub ComboBox1_Change() With ComboBox1 Label1.Visible = (.Value <> "Paid") Label2.Visible = (.Value <> "Paid") Label3.Visible = (.Value <> "Paid") End With End Sub
Thanks,
Mike
If you are satisfied with the solution(s) provided, please mark your thread as Solved.
Select Thread Tools-> Mark thread as Solved.
Charles
You can do it without a loop but the syntax would be slightly different.
Where are the labels located? Woksheet? Userform?
If posting code please use code tags, see here.
Well, it has the same amount of rows now... :P
(Of course that wouldn't be the case if you had four or more labels.)
Here's an example for labels on a userform.
Dim I As Integer For I = 1 To 3 Me.Controls("Label" &I).Visible = ComboBox.Value<>"Paid" Next I
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks