Как использовать этот код VBA для автоматической фильтрации чисел в столбце 2?

Question

Моя проблема в том, что когда я применяю код, он скрывает все значения.Он отлично работает с текстом в любом другом столбце.

Private Sub TextBox2_Change()
    TextBox2.Value = Trim(TextBox2.Value)
    Sheet1.Range("A2:F" & Rows.Count).AutoFilter field:=2, Criteria1:="*" & TextBox2.Value & "*"
End Sub

Спасибо за вашу помощь.

Answer 1

Ваш критерий передает строку с подстановочными знаками, но фильтры в числовых столбцах не поддерживают подстановочные знаки.Чтобы сделать то, что вы пытаетесь сделать, вам понадобится столбец, заполненный формулой вдоль строк = TEXT (B2, "#"), чтобы преобразовать числа в строки и применить к ним свою фильтрацию.колонка.