Всем добрый день!
Пытаюсь сделать фильтр через UserForm.
Необходимо чтобы при заполнении тектбокс1 значение фильтр становился ">=", а при заполнении тектбокс2 значение фильтр становился "<="
Создал UserForm
Написал код:
НО на выходе результат не выводится.
В чем ошибка?
Пытаюсь сделать фильтр через UserForm.
Необходимо чтобы при заполнении тектбокс1 значение фильтр становился ">=", а при заполнении тектбокс2 значение фильтр становился "<="
Создал UserForm
Написал код:
| Код |
|---|
Private Sub CommandButton1_Click()
ActiveSheet.Range("$A$3:$E$7").AutoFilter Field:=4, Criteria1:= _
">=" & TextBox1.Value, Operator:=xlAnd, Criteria2:="<=" & TextBox2.Value
Unload UserForm2
End Sub
|
В чем ошибка?
Изменено: - 09.04.2020 11:35:02
