Скопировать и вставить строки с переменным диапазоном ячеек не удается

Question

Я получаю ошибку времени выполнения 1004 на первом xSheet.Range в цикле for, и я уверен, что ошибка также возникнет на 2 следующих. CPC имеет атрибут Value и строку тоже. Это работало в тестовом листе, но не было петли.

Answer 1

Я нашел решение для моей ошибки синтаксиса кода. Прилагается и работает