Discussion :

[dbeauhaire]

Bonjour à toutes et à tous,

Je vous écris car je ne trouve pas solution à mon problème, peut être quelqu'un pourra-t-il m'éclairer.

Sur une feuille Excel j'ai un tableau :

la première colonne A : des N° d'article
la deuxième colonne B : date entrée
la troisième colonne C : date sortie

J'ai créé un userform avec :

- un combobox qui me permet de choisir le N° article
- textbox 1 qui me permet de rentrer la date 1
- text box 2 qui me permet de rentrer la date 2

Or je n'arrive pas à lier les textbox au combobox, de façon à ce que lorsque je sélectionne le n° article dans le combobox je puisse inscrire dans la ligne correspondante les date 1 & 2.

Quelqu'un aurait-il réponse à mon problème?

D'avance merci

[Daniel.C]

Bonjour,

Essaie :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Me.TextBox1 = [B2].Offset(Me.ComboBox1.ListIndex)
Me.TextBox2 = [C2].Offset(Me.ComboBox1.ListIndex)

ou mieux, pour des dates :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Me.TextBox1 = Format([B2].Offset(Me.ComboBox1.ListIndex), "dd/mm/yyyy")
Me.TextBox2 = Format([C2].Offset(Me.ComboBox1.ListIndex), "dd/mm/yyyy")

[dbeauhaire]

Désolé, Je ne comprend pas ces lignes.

elle se placent dans Private Sub combobox1_Change() ?

[dbeauhaire]

Finalement, avec un peu de réflexion, j'ai compris. Merci beaucoup

Par contre je veux bien une explication de la ligne de code car je ne comprend pas le terme "Me."

[Daniel.C]

"Me" représente le module dans laquelle se trouve la macro. Dans le module d'un userform, "Me" équivaut à l'userform :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.TextBox1 = [B2].Offset(Me.ComboBox1.ListIndex)

équivaut à :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

UserForm1.TextBox1 = [B2].Offset(Me.ComboBox1.ListIndex)

si tel est le nom de l'userform. Tu n'es pas obligé de le mettre, mais, comme avec le nom de l'userform, une fois tapé le ".", les noms des contrôles apparaissent comme les propriétés et les méthodes, d'où gain de temps à la saisie et moindre risque de faute de frappe.
De même, dans un module feuille, "Me" équivaut au nome de la feuille attachée au module.

[dbeauhaire]

Merci pour cette info et surtout grand merci pour m'avoir débloqué de mon problème.