Выделение, поиск дубликатов и копирование

[nbw]

Добрый день!

Есть 2е задачи которые я уже 2а дня не могу решить.

Первая задача:
Есть два столбца на 2м листе в которых есть формулы и нужно выделить те ячейки в которых формула выдала ошибку, но выделять эти ячейки нужно на 1м листе.
Я выделить смог только на том же листе где и формулы, а мне надо выделить на другом листе, но те же самые ячейки.

Задача вторая:
Есть два столбца в одном названия городов, а в другом коды этих городов. Нужно найти повторяющиеся коды городов и если напротив одного из этих повторяющихся кодов ячейка названия пустая, то нужно скопировать название города которое стоит напротив другого такого же кода.

Помогите пожалуйста!

[vikttur]

Покажите, что смогли.

[nbw]

Selection.SpecialCells(xlCellTypeFormulas, 16).Select

Это выделяет ячейки с ошибками, но только на том же листе на котором ошибки и я не знаю как сделать так чтобы ошибки находил в одном листе, а выделял ячейки в другом или после того как выделились ячеки с ошибками - выделить те же самые ячейки в другом листе. Это тоже не вышло

iadr = ActiveWindow.RangeSelection.Address
Sheets("Лист1").Select
Range(iadr).select

т.е. оно повторяет выделение, но там вроде как лимит есть. У меня в среднем 12000 - 15000 строк в таблице и эта функция делает маленький кусочек от того что мне надо.