Здравствуйте!
Ребята, пытаюсь очистить всю таблицу по столбцам от всех наименований идентичных наименованию комбобокса.
[vba]Код
Dim Cell As Range
'Поиск наименований на основании наименования в комбобоксе
Set Cell = ThisWorkbook.Worksheets("Лист").ListObjects("Таблица").ListColumns.Item.Range.Find(Form.ComboBox.Value, LookAt:=xlWhole)
If Not Cell Is Nothing Then 'Если найдены наименования в таблице идентичные с наименованием комбобокса
Cell.Value = "" 'Очистить все ячейки от данных наименований
End If
[/vba]
Но параметру Item не работает без номера колонки. С номером колонки Item(1) очищаются только одно наименование и только обозначенной колонки.
Каким образом очистить все наименования таблицы идентичные с наименованием комбобокса?