Bonjour le forum,
J'ai pas mal tourné sur les différents forums, mais pas moyen de trouver une solution a mon problème .
J'ai dans ma colonne A une devise, dans la colonne B un taux, dans la colonne C la date à laquelle le taux a été rentré.
Je cherche à créer un Userform, dans lequel:
* Dans la combobox1 --> il y a liste des taux (Ca pas de soucis)
* Dans La Textbox1 --> l'utilisateur saisit une date
* Dans la Textbox3 --> Affichage automatique du taux de la devise [Le taux doit être celui saisi le plus récemment, mais ne peut pas être postérieur à la date saisie]
* Dans la Textbox2 --> La date de saisie du Taux en question.
Comme les dates sont classées de la plus récentes à la plus anciennes, j'étais partie sur quelque chose comme ça, mais comme vous pouvez le voir, je ne sais pas comment exprimer ma condition que le résultat trouvé ne peut être postérieur à la date saisie.
Code :
Private Sub Textbox1_AfterUpdate()
Dim DateTaux As Date
DateTaux = Application.VLookup(ComboBox1, Range("A2:C10000"), 3, False)
If DateTaux > TextBox1.Value Then
XXXXXXXX
Else
TextBox2 = DateTaux
End If
Merci d'avance pour votre aide !