Change all userform label colour

[JamesT1]

Good Morning All

I have multiple Userform with different amounts of labels in them... how can I make all labels the same colour without having to change them all individually, like this

many thanks

Private Sub UserForm_Activate()
Label1.BackColor = RGB(0, 115, 207)
Label2.BackColor = RGB(0, 115, 207)
Label3.BackColor = RGB(0, 115, 207)
Label4.BackColor = RGB(0, 115, 207)
Label5.BackColor = RGB(0, 115, 207)
Label6.BackColor = RGB(0, 115, 207)
Label8.BackColor = RGB(0, 115, 207)
Label9.BackColor = RGB(0, 115, 207)
Label10.BackColor = RGB(0, 115, 207)
Label11.BackColor = RGB(0, 115, 207)
Label12.BackColor = RGB(0, 115, 207)
Label13.BackColor = RGB(0, 115, 207)
Label14.BackColor = RGB(0, 115, 207)
Label15.BackColor = RGB(0, 115, 207)
Label16.BackColor = RGB(0, 115, 207)
Label17.BackColor = RGB(0, 115, 207)
Label18.BackColor = RGB(0, 115, 207)


End Sub

[Akuini]

Maybe this:

For i = 1 To 18 
   UserForm1.Controls("Label" & i).BackColor = RGB(0, 115, 207)
Next

[JamesT1]

Akuini

Excellent,, many thanks for your help,,, works a treat,,

Cheers

Jim

[Akuini]

You're welcome, glad to help, & thanks for the feedback.