VBA Excel 2010 - 自動塗りつぶしなし

Question

次の列に自動塗りつぶししようとしていますが、範囲を設定してチェックしましたが、.Selectを使用して選択しましたが、コードを実行すると、 "AutoFill method of 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を見てきましたが、それはそれを解決doesntの、私はまた、私が何かを逃したかどうかを確認するためにmsdnを見ても、対象範囲がソース範囲を含める必要があり、空の

Answer 1

を思いつきました。使用：

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