Как раз обычные числа и нужны
---
Worksheets("Заявка").Range("A:K").AutoFilter Field:=6, Criteria1:="<=" & Worksheets("Показ").Cells(6, 6).Value2
Worksheets("Заявка").Range("A:K").AutoFilter Field:=11, Criteria1:=">=" & Worksheets("Показ").Cells(6, 6).Value2
---
Последний раз редактировалось COBEHOK; 31.05.2006 в 23:37.
|