Discussion :

[jgresse1025]

Bonjour,

J'ai un fichier de suivi de fabrication fait sur excel qui marche bien et je voudrais l'améliorr.
Pour cela, il faudrait que je compare la date de lancement avec les dates d'autre fichier et ne sélectionner que les dates qui sont supérieures à la date de lancement.

Je ne sais pas comment faire.
J'ai essayer de modifier mes requètes mais ça ne marche pas.

Je vous joint un fichier word pour expliquer mon problème

J'ai cette requête

Code :

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

1
2
 
Sql = "Select * from [2015$A6:J500] where [Txx-xxxxx]='" & Me.ComboBox1.Text & "' and [Référence pièce Timex]='" & Me.ComboBox2.Text & "' and Description='" & Me.ComboBox3.Text & "' "

Et j'ai ça

Code :

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

1
2
 
Nb = RetournNb(mrs2, "[Lancé le]<>Null")

Je voudrais faire ça mais ça ne marche pas.

Code :

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

1
2
 
Nb = RetournNb(mrs2, "[Lancé le]>Workbooks("Monclasseur.xlsm).Sheets("Mafeuille").Range("Celluleavecladatedelancement")")

Ou essayer ça mais je ne sais pas comment l'écrire

Code :

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

1
2
 
Sql = "Select * from [2015$A6:J500] where [Lancé le]>Workbooks("Monclasseur.xlsm).Sheets("Mafeuille").Range("Celluleavecladatedelancement") & [Txx-xxxxx]='" & Me.ComboBox1.Text & "' and [Référence pièce Timex]='" & Me.ComboBox2.Text & "' and Description='" & Me.ComboBox3.Text & "' "

Merci de votre aide.

Julien