Beug sur un code

Résolu
JCB40 Messages postés 3013 Date d'inscription   Statut Membre Dernière intervention   -  
JCB40 Messages postés 3013 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour
Mon code beug sur la ligne en gras pouvez vous svp me dire ou se trouve l'erreur
Cordialement et Merci


 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
  For I = 1 To 14
   <bold> Me.Controls("TextBox" & I) = Ws.Cells(Ligne, I + 1)</bold>
  Next I
 End Sub




EDIT : Ajout du LANGAGE dans les balises de code (la coloration syntaxique).
Explications disponibles ici :
https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code

Merci d'y penser dans tes prochains messages.

1 réponse

Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Bonjour,

Tu n'as pas déclaré et affecté Ws
1
JCB40 Messages postés 3013 Date d'inscription   Statut Membre Dernière intervention   463
 
Bonsoir Patrice
Merci pour ta réponse
J'ai rectifié et cela fonctionne
Cordialement
0