Bonsoir à tous,

j'ai créé le code suivant qui réalise parfaitement une extraction des données souhaitées sous excel 2003. En revanche, l'extraction ne marche pas sous 2007 et 2010. (alors que le filtre élaboré, renseigné avec les données fournies par la macro marche bien.... mais manuellement).

Maintenant que je suis sous 2010, je n'ai pas le choix, il faut que je trouve une solution.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Set BaseDonneesVl = Range(Cells(1, 1), Cells(NbLignesVl, 7))
    Set criteresVl = Range(Cells(1, 10), Cells(2, 11))
    Set extractionVl = Range(Cells(1, 20), Cells(1, 26))
 
    Cells(2, 10).FormulaR1C1 = ">=" & BorneBasse
    Cells(2, 11).FormulaR1C1 = "<=" & BorneHaute
 
    BaseDonneesVl.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=criteresVl, CopyToRange:=extractionVl, Unique:=True
 
    NblignesVlExtraites = Application.WorksheetFunction.CountA(Columns(20))
Je précise que BorneBasse et BorneHaute sont des dates.

Si une âme charitable peut me sortir de cette ornière.

Merci d'avance