snb, post 29, made Max- and min value =0


Paul, post 31, "Set wb2 = Workbooks("Book2.xlsx")", both workbooks are .xlsm and can't be changed. I tried with .xlsx but no difference. I tried your code but I get same result as before = filtered but doesn't show until I click the OK button. I also tried with "ThisWorkbook".


p45cal, I am not allowed to use TeamViewer. I tested with Macro Recorder, inserted Max- and Min Values manually, and it works! 

Sub Macro4()
'
' Macro4 Macro
' Recorded in Book1
' Manually insert of Max- and Min values.


    'This works (with ",").
    'Result: Filtered sheet shows as expected.
    Range("A1:J1").Select
    Selection.AutoFilter
    ActiveSheet.Range("$A$1:$J$40").AutoFilter Field:=6, Criteria1:=">=0,2779" _
        , Operator:=xlAnd, Criteria2:="<=0,3779"
    Selection.AutoFilter
    
    'This works not (with "."). Not even if I click "OK" button.
    'Result: Blank page except first row
    Range("A1:J1").Select
    Selection.AutoFilter
    ActiveSheet.Range("$A$1:$J$40").AutoFilter Field:=6, Criteria1:=">=0.2779" _
        , Operator:=xlAnd, Criteria2:="<=0.3779"
End Sub
One observation: Max value show value with ",".
I have tried: 1. +"0,05" 2. +0.05 and 3. +(5/100).
All with same result: Blank page except first row, click "OK" button and filtered sheet shows.