VBA Excel 2010 – 自动填写不填充

我试图自动填充到下一列，我设置的范围，我检查他们，他们select使用。select，但是当我运行代码它错误地说：“范围类的自动填充方法失败”

 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 

我已经看了这个答案，但它没有解决它，我也看着MSDN ，看看我是否错过了什么，但也空了

Answer 1

目标范围必须包括源范围。 使用：

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