changer couleur dans un label a partir d'un textbox

Bonsoir a tous

J'ai un userform qui possède 8 textbox mais seulement les textbox 2 a 8 serviront a faire changer les couleur dans les labels qui sont identique au chiffres écrit dans les textbox ..

J'ai tenter de programmer mais j'ai des erreur que je ne comprend pas ,,, au lieu de changer la couleur il écrit le chiffre 25 ,,, ???? je ne sais pas pourquoi ,,,, si j'écrit le chiffre 1 dans la textbox 2 je voulais qu'il mettre le backcolor en rouge
je vous envoie bien sur un petit dossier pour mieux me comprendre ,,,

mes lignes de code sont

Private Sub TextBox2_Change()
Dim i As Byte, j As Byte, k As Byte, couleur As Integer, Ctrl As Control

If Len(TextBox2.Value) = 2 Then TextBox3.SetFocus
Application.ScreenUpdating = True
With Sheets("Loto-Quebec")
numero1 = TextBox2.Value
i = 1

For j = 29 To 35
For k = 45 To 51 'Step 1
Controls("Label" & i).Caption = numero1
MaCouleur = &HFF&
Controls("Label" & i) = MaCouleur
i = i + 1
Next k
Next j

End With
Application.ScreenUpdating = False
End Sub


donc merci de votre aide et attend une correction avec beaucoup de patience
denis Gauthier