не обижайтесь, но где вы об этом упоминали в своем посте о процедуре  
процедуру я могу написать, но это выходит за рамки советов "по-быстрому"

ф4=а3  
протягиваем  
в джи4=ф4*2  
 
протягиваем  
 
я так понял

чуть пар не пошел из головы  
зачем так сложно  
ссылка на первый столбец и в соседней ячейке новой таблицы ф4= производите действие с

не понял трудностей  
выводится фильтр  
оставляете галками нужные для удаления склады  
фильтруете  
и отфильтрованное удаляете  
 
потом снимаете автофильтр или  в автофильтре показать все оставшееся

грабли где то у вас  
 
скопировал формулу прямо с форума  
вставил в а1 3  
 
в а2  10  
 
в с1 4   и все работает  
 
 
если протягиваете формулу, поставьте доллары  
это типичная ошибка

=ЕСЛИ(И(C1>=A1;C1<=A2);"годен";"негоден")  
 
а вообщето хорошо поставленное исходное условие залог правильного решения на 90 процентов  
 
удачи

если записи уникальны вместо впр лучше использовать комбинацию поискпоз и индекс  
а вообщето в демо надстройке хозяина этого форума есть хорошая vlookup3 по моему

=ЕСЛИ(C1=A1;"годен";ЕСЛИ(C1=A2;"годен";"негоден"))  
данные в а1 и а2  
 
проверяемая с1