Отфильтровать диапазон значений, в которые попадают значения моей ячейки - PullRequest
Новая
       4

Отфильтровать диапазон значений, в которые попадают значения моей ячейки

0 голосов
/ 21 февраля 2020

Я работаю с двумя листами в одной книге. Лист1 имеет значения. Лист 2 имеет таблицу данных с заголовком. Моя цель - прочитать значения из sheet1, а затем отфильтровать указанный столбец c с указанным значением. Я могу получить это далеко. Проблема в том, что мое значение в sheet1 не является точным значением того, что было бы в sheet2. например. В листе 1 у меня есть значения а = 5,68. Теперь, когда я go на листе 2, у него нет 5.68 в столбце «а», но я хочу выбрать и отфильтровать значения, в которые попадает a = 5.68. например sheet2 может иметь 4,5 и 7,5. если эти значения являются ближайшими / ближайшими к значениям a, то я хочу отфильтровать их. В итоге, если a = 5,68 на листе 2, тогда I go на листе 2 и отфильтруйте диапазон, в который попадает 5,68, и эти значения будут 4,5 и 7,5, и получите полученное значение в следующем столбце и вставьте его на новый лист.

Обновление:

Мне нужно отфильтровать эти значения в этом столбце ... в столбце A ... строка 2 (A2) может быть 4,5, а строка 20 (A20) может быть 7,5. .но это те значения, которые находятся в пределах 4,5. Поскольку фильтрация этих значений приведет к другому набору значений в столбце B. Тогда у меня также есть значение ab, для которого я буду фильтровать диапазон в столбце. Я бы сделал эту обработку 3 раза с 3 значениями (a, b, c) из sheet1 и отфильтровал диапазон, в который они попадают в sheet2 в столбце (A, B, C), чтобы получить окончательные значения в столбце D. ....

Вот с чего я начал: 

 Sub Filter_criteria()
 Dim A As String

 With Worksheets("Sheet1")
  Set Al = .Range("A11")
 End With
 With Worksheets("Sheet2")
  With .Range("A1:N" & Cells(.Rows.Count, "N").End(xlUp).Row)
   .AutoFilter
   Range("K1").AutoFilter Field:=11, Criteria1:=A, Operator:=xlFilterValues
  End With
  .AutoFilterMode = False
 End With
 End Sub
...