Fichier Client

Bonjour,
Je suis vraiment tres novice dans ce genre de travail
Merci par avance pour votre aide.

Voila j'ai fait un formulaire client sur excel, sur visual basic je me retrouve avec cet erreur : Erreur d’exécution 91 - Variable objet ou varable de bloc with non definie -
Voici la formule

'Pour la liste deroulante code client
Private Sub ComboBox1_Change()
  Dim Ligne As Long
  Dim I As Integer
  If Me.ComboBox1.ListIndex = 1 Then Exit Sub
  Ligne = Me.ComboBox1.ListIndex + 2
  ComboBox2 = Ws.Cells(Ligne, "B")
  For I = 1 To 17
    Me.Controls("TexBox" & I) = Ws.Cells(Ligne, I + 2)
  Next I

Merci de me dire ce que je ne fais pas bien
Merci par avance
Nathalie