Как выбрать диапазон и обновить в Excel, найдя последнюю строку в VBA?

Question

Я пытаюсь скопировать вставленные столбцы с одного листа на другой, у которого уже есть некоторые значения:

Пример: на листе 1 есть 20 записей со столбцами от A до H На листе 2 есть 100 записей и данные отфильтрованы иТеперь 50 записей отображаются на листе 2, выберите столбец C, получите все значения и скопируйте. Вставьте его на лист 1 из строки 21 столбца C (так как первые 2 строки содержат данные). Снова на листе 2 столбца D получите все значения и скопируйте его. Вставьте его вЛист 2 из строки 21 столбца D

Из столбца C в столбец H удалите повторяющиеся записи

Я пытаюсь выполнить SpecialCells (xlCellTypeVisible) .Copy и PasteSpecial Paste: = xlPasteAll

iRowCount1 = objASheets.UsedRange.Rows.Count
iRowCount2 = objBSheets.UsedRange.Rows.Count
objASheets.Range("$O$2:O").SpecialCells(xlCellTypeVisible).Copy
objBSheets.Range("$C$2:C").PasteSpecial Paste:=xlPasteAll
objASheets.Range("J$2:J").SpecialCells(xlCellTypeVisible).Copy
objBSheets.Range("$D$2:D").PasteSpecial Paste:=xlPasteAll
Application.CutCopyMode = False
objBSheets.Range("$G$2:G").Value = "FAIL"
objBSheets.Range("$H$2:H").Value = "Not found"

Я хочу иметь возможность параметризовать iRowCount1 и iRowCount2 в функцию диапазона, обновлять список и удалять дубликаты.

Первые 10 строк (игнорировать 1-ю строку в качестве заголовка) существуют в файледобавляются следующие 13 строк, из которых необходимо удалить из нижней половины, а не из верхней.