VBA Excel 2010 - AutoFill not Filling

Question

Я пытаюсь выполнить автозаполнение следующего столбца, я установил диапазоны, я их проверил, и они выбраны с помощью .Select, но когда я запускаю код, он ошибочно говорит: «Метод автозаполнения Range класс не удалось»

LastRow = [C65000].End(xlUp).Row 
LastColumn = [IV5].End(xlToLeft).Column 

Set AutoFillSource = Range(Cells(5, LastColumn), Cells(LastRow, LastColumn)) 
Set AutoFillRangeTo = Range(Cells(5, LastColumn + 1), Cells(LastRow, LastColumn + 1)) 

AutoFillSource.AutoFill Destination:=AutoFillRangeTo 

Я посмотрел на this SO answer, но это не решить, я также посмотрел на msdn, чтобы увидеть, если я пропустил что-нибудь, но подошел пустым

Answer 1

целевой диапазон должен включать исходный диапазон , Использование:

Set AutoFillRangeTo = Range(Cells(5, LastColumn), Cells(LastRow, LastColumn + 1))