*Bonjour*
Voilà la fonction :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Public Sub filtrerTD(TypeRens, DateEff) extractionT = Mid(TypeRens, 1, 5) extractionD = Mid(DateEff, 4, 7) Forms("F_GFIN").filter = "[TYPE D'EVENEMENT] like '" & extractionT & "*' &" And "[date d'effet] like '*" & extractionD & "'" Forms("F_GFIN").FilterOn = True End Sub
L'erreur que cela m'affiche est : "incompatibilité de type"... j'ai du faire une erreur de guillemet peut être mais je ne trouve pas.
Quelqu'un serait-il à même de pouvoir me trouver la solution? merci d'avance
Partager