Удаление листов в книге по определённым условиям

[inside9]

Помогите пожалуйста вот с такой задачей. В книге Excel имеется несколько листов (Ремонты, КНС, ОСК, ОСВ и т д). На листе Ремонты скажем в ячейке D2 из выпадающего списка выбирается соответствующий объект (КНС или ОСК или ОСВ и т. п.), т. е. имена листов совпадают с названиями объектов. Так вот, надо, чтобы при выборе например КНС, автоматически удалялись все листы, кроме листа с именем КНС (ну и канешна листа Ремонты), при выборе ОСК - удалялись все остальные листы, кроме листа ОСК и т. д. Наверно, такую задачу возможно решить только посредством VBA. Подскажите пожалуста код макроса!!! За ранее спасибо!

[pivas]

Попробуйте приспособить такой вариант:

[inside9]

Спасибааааа большоеее буду приспосабливать!!!