Formulaire VBA - Liste déroulante décalage

Bonjour à tous,

Intrigué par le VBA, j'ai souhaité apprendre directement via un formulaire. Par forcément le meilleur moyen mais j'ai voulu lier l'utile et l'apprentissage.

Néanmoins, je rencontre un souci au niveau de la liste déroulante (combobox 1).
Lorsque je choisi un numéro dans ma combobox, les informations de chaque textbox sont décalées sur mon formulaire

Vous trouverez le fichier en pièce jointe.

Par avance, je vous remercie pour votre aide et vos conseils.

Bonne journée

Bonjour,

Enlevez le +1 dans le Combo1_Change

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 5
        Me.Controls("TextBox" & i) = Ws.Cells(Ligne, i)
    Next i
End Sub

A+

Bonjour TheoDpt,

Ce n'est pas : Me.Controls("TextBox" & I) = Ws.Cells(Ligne, I + 1)

mais : Me.Controls("TextBox" & I) = Ws.Cells(Ligne, I )

I commence à 1 et la première donnée se trouve en colonne A (soit la colonne 1) et non pas en colonne B qui correspond à I+1.

Merci à tous c'est bien ça !

Merci pour votre aide et vos explication