Text box selon la colonne d'une BDD

Bonjour le forum,

Je vous présente mon problème : J'ai une base de données qui présente x colonnes.

J'ai créé un formulaire via un userform grâce aux différents codes présents sur le forum ou internet.

Mes textbox sont alimentés via ma combo box. Jusqu'à là, tout fonctionne

Ma question : Comment changer dans le code la valeur que le textbox ramène suite au combo box. Car selon le code et si je le comprends bien, le text box 1 va correspondre à ma 2ème colonne, le text box 2, à ma 3ème colonne et ainsi de suite.

Mais si je décide de faire correspondre le text box 1 avec la 5ème colonne et le text box 2 avec la 50ème colonne, comment faire ?

En espérant avoir été clair.

Je joins mon fichier pour illustrer mes propos.

Bonjour

Tu peux toujours modifier ta boucle en y introduisant une fonction ''Choose'' :

For I = 1 To 55
    'Me.Controls("TextBox" & I) = Ws.Cells(Ligne, I + 1)
    tb = choose(I,1,2,......50)
    col = choose(I,5,50.......)
    Me.Controls("TextBox" & tb) = Ws.Cells(Ligne, col + 1)
Next I

Si tu as 50 textbox, il te faut compléter jusqu'à 50 les valeurs que va prendre la variable tb et compléter dans l'ordre correspondant les 50 numéros de colonnes que va prendre la variable col.

OK ?

Bye !

Merci pour ta réponse,

Je vais tester dans la journée !

Résolu, c'est super.

Merci !