OVH Cloud OVH Cloud

UserForm

1 réponse
Avatar
Guillaume
Bonjour a tous!

Voila je débute dans le userform.

J'aimeri pouvoir afficher dans mon userform, un liste de date déja existante
sur une feuille. ca ca marche.

Apres, en fonction de la date choisi par exemple 01/01/04, qui se trouve sur
la ligne 3, je voudrait qu'apparaissent sur mon userform, le résultat de
cette date (résultat en colonne 5).

Comment faire?
De meme peut t'on afficher les résultat de la colonne 6 , 7, 8.

Merci par avance.
Guillaume

1 réponse

Avatar
michdenis
Bonjour Guillaume,

En supposant que tes données (date) en feuille 1 colonne A:A

tu peux écrire ce code sous un bouton de commande dans ton formulaire.
Attention au nom des textbox.

'--------------------
Dim LaDate As Long, Ligne As Long

With Worksheets("Feuil1")
LaDate = .Range("a11").Value2
'Ligne = No ligne où se trouve la date
Ligne = Application.Match(LaDate, .Range("A:A"), 0)
'Pour retrouver la valeur de la colonne D
Me.textbox1 = .Range("A" & Ligne).Offset(, 3)
'Pour retrouver la valeur de la colonne E
Me.textbox1 = .Range("A" & Ligne).Offset(, 4)
'Pour retrouver la valeur de la colonne F
Me.textbox1 = .Range("A" & Ligne).Offset(, 5)
End With
'--------------------

Salutations!



"Guillaume" a écrit dans le message de news:
Bonjour a tous!

Voila je débute dans le userform.

J'aimeri pouvoir afficher dans mon userform, un liste de date déja existante
sur une feuille. ca ca marche.

Apres, en fonction de la date choisi par exemple 01/01/04, qui se trouve sur
la ligne 3, je voudrait qu'apparaissent sur mon userform, le résultat de
cette date (résultat en colonne 5).

Comment faire?
De meme peut t'on afficher les résultat de la colonne 6 , 7, 8.

Merci par avance.
Guillaume