Forumda emeği geçen herkese merhaba. Arkadaşlar aşağıdaki kodlarla filtre yapmaya çalışıyorum.Fakat bir türlü olmuyor. Uzun uğraşıdan sonra sorunun 8. ve 26. alan sütunlarında virgüllü rakam (1,70 veya 0,35 gibi) kullanılmasından kaynaklandığı hükmüne vardım. Syf2 deki ölçüt hücrelerini . ile denediğimde ise hücre tarih formatına dönüyor. Mesela 1,70 i 1.70 yaptığımda tarih formatı alıyor. Bu sorunu aşmam için ne yapmam lazım ? İlgilenen arkadaşlara şimdiden teşekkürler. 
Dim syf1, syf2 As Worksheet
Set syf1 = Worksheets("Sayfa1")
Set syf2 = Worksheets("Sayfa2")
ActiveSheet.Range("$E$30:$AW$188").AutoFilter Field:=3, Criteria1:=syf2.Range("CC2")
ActiveSheet.Range("$E$30:$AW$188").AutoFilter Field:=8, Criteria1:=">=" & syf2.Range("CH2") _
, Operator:=xlAnd, Criteria2:="<=" & syf2.Range("CH3")
ActiveSheet.Range("$E$30:$AW$188").AutoFilter Field:=26, Criteria1:=">=" & syf2.Range("CZ2")
Dim syf1, syf2 As Worksheet
Set syf1 = Worksheets("Sayfa1")
Set syf2 = Worksheets("Sayfa2")
ActiveSheet.Range("$E$30:$AW$188").AutoFilter Field:=3, Criteria1:=syf2.Range("CC2")
ActiveSheet.Range("$E$30:$AW$188").AutoFilter Field:=8, Criteria1:=">=" & syf2.Range("CH2") _
, Operator:=xlAnd, Criteria2:="<=" & syf2.Range("CH3")
ActiveSheet.Range("$E$30:$AW$188").AutoFilter Field:=26, Criteria1:=">=" & syf2.Range("CZ2")
