BackGround Color applied to all userforms

Hello,

I am fairly new in vba programming and i`m trying to apply a custom color to all of my userforms. The code bellow modifies the color of a single userform based on the rgb values inserted in 3 cells. Can i apply the change to more than one userform? I have found a code that does that and much more (Beyond Excel: Adding Color and Glow Effects to Excel's UserForms on youtube, i am not allowed to post the youtube link yet) but after two days in which i tried to understand the code i realized that it is much too complex for my current vba level.

Option Explicit
Sub UserForm3x()

    Call updateRGB
    UserForm3.Show

End Sub
Sub updateRGB()
Dim r As Integer, g As Integer, b As Integer, x As Integer, y As Integer, z As Integer

r = Sheets("TEST").Range("A1").Value
g = Sheets("TEST").Range("B1").Value
b = Sheets("TEST").Range("C1").Value
UserForm3.BackColor = RGB(r, g, b)
UserForm3.TextBox2 = r
UserForm3.TextBox3 = g
UserForm3.TextBox4 = b

End Sub

Thanks,
Have a nice day
Chris

Have a look at attached, if you are working through a series of Userforms might be useful starting point

Option Explicit
Sub UserForm3x()
    Call updateRGB
End Sub
Sub updateRGB()
Dim r As Integer, g As Integer, b As Integer, x As Integer, i As Integer
Dim strFormName As String
For i = 1 To 3
strFormName = "UserForm" & i
With Form(strFormName)
r = Sheets("TEST").Range("A1").Value
g = Sheets("TEST").Range("B1").Value
b = Sheets("TEST").Range("C1").Value
    .BackColor = RGB(r, g, b)
    .Label1.BackColor = RGB(r - 20, g - 20, b - 20)
    .TextBox1.BackColor = RGB(r + 30, g + 30, b + 30)
    .ListBox1.BackColor = RGB(r - 80, g - 80, b - 80)
    .ComboBox1.BackColor = RGB(r - 50, g - 50, b - 50)
    MsgBox "Show Userform" & i
    .Show vbModal
End With

Next i
End Sub
Function Form(Name As String) As Object
  Set Form = CallByName(UserForms, "Add", VbMethod, Name)
End Function