macro de tri qui ne prend pas les decimaux

[olivemotard]

Bonjour, j'ai créé, avec l'aide de ce forum, une macro qui tri les données d'un tableau et qui les classes, tout marche trés bien ,sauf et oui il y a toujours un sauf...
Les valeurs décimales, ne sont pas prises en compte, si je lui demande tout ce qui est au dessus de 2, impecable, si je lui demande tout ce qui est au desus de 2.5, rien !

Merci de m'aider car la, je ne sais vraiment pas pourquoi ...

 Application.ScreenUpdating = False
    Sheets("recherche").Select
    ActiveSheet.Unprotect
    Sheets("acceuil").Select
    Range("G10").Select
    Selection.Copy
    Sheets("recherche").Select
    Range("AM1").Select
    ActiveSheet.Paste
    Range("K3:K500").AutoFilter Field:=11, Criteria1:=">=" & Range("AM1").Value
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowFiltering:=True
    Sheets("acceuil").Select
    Application.CutCopyMode = False
    Application.ScreenUpdating = True
End Sub

Merci d'avance

 

[tototiti2008]

Re : macro de tri qui ne prend pas les decimaux

Bonjour olivemotard,

peut-être :

Range("K3:K500").AutoFilter Field:=11, Criteria1:=">=" & replace(Range("AM1").text,",",".")

 

[olivemotard]

Re : macro de tri qui ne prend pas les decimaux

Merci tototiti 2008 , ca fonctionne parfaitement.