comparaison de cells et de textbox d'userform

[joris]

Bonjour a tous,

j'ai une question simpliste mais qui pourtant me bloque:


voila le code

For Each C In Myplage
If C = UserForm1.TextBox1.Value And Cells(C.Row, 6) = UserForm1.TextBox3.Value Then

la premiere condition marche tres bien mais j'ai un pb avec la deuxieme:

le debuggeur me montre que:
dans cells(c,row,6) ca me sors 18/08/2004
et dans UserForm1.TextBox3.Value ca me sors "18/08/2004"

donc ca considere que c pas la meme chose.

Quelqu'un pourrais m'expliquer pk?

merci

Joris

 

[Arnaud]

salut 🙂,

essaye avec ça :

If C = UserForm1.TextBox1.Value And Cells(C.Row, 6) = FormatDateTime(UserForm1.TextBox3.Value, vbShortDate) Then

 

[joris]

Merci Arnaud,

mais ca ne marche pas ma version de Visual Basic de reconnait pas FormatDateTime...

quelqu'un aurait t'il une autre idee.

peut etre essayer de rajouter des guillemets a Cells(C.row,6) avant la comparaison??

Merci

 

[joris]

c'est bon j'ai trouve mon bonheur en passant par une variable intermediaire!

For Each C In Myplage
inter = Cells(C.Row, 6)
If C = UserForm1.TextBox1.Value And inter = UserForm1.TextBox3.Value Then



merci pour votre aide

Joris