2011-10-25 4 views
1

VBA에서 수식이있는 셀의 더하기 기호를 두 번 클릭하고 해당 열 수를 자동 완성하는 경우와 같이 전체 행 자동 채우기와 동일한 작업을 수행하는 데 문제가 있습니다. .Excel 2010 VBA 전체 채우기 열

칼럼 A와 함께 나는 날짜 목록을 가지고있다. 3 행에는 수식 목록이 있습니다. 나는 아래로 정확한 공식의 단지 사본을 채우기를 원하는

For i = 2 to Columns.Count 
    'FillDown the whole of Column i with the formula in Cells(3,i) 
Next i 

... 누군가가이 작업을 수행 할 수있는 방법을 알고 있나요 : 어떻게 효율적으로이 작업을 수행하는 매크로를 작성하려면 어떻게해야합니까? 지금까지 20 분 정도 걸리는 방법이 있지만 수동으로이 작업을 수행 할 때는 시간이 많이 걸리지 않으므로 훨씬 빠른 방법이 있어야한다고 생각합니다.

대단히 감사드립니다.

답변

4

대상 범위와 함께 Autofill을 사용해 볼 수 있습니다.

뭔가 같은 :

Selection.AutoFill Destination:=Range("A2:A12") 

[편집] 또는 :

Range("A1").AutoFill Destination:=Range(Cells(1, firstColNumber), Cells(1, lastColNumber)) 
+0

범위의 필요성은 각 열이 변경 될 것인가? 즉 Range ("A2 : A12")를 매번 넣거나 Range ("B2 : B12") 등으로 업데이트해야합니까? 내가 열 번호와 문자를 다루지 않기 때문에 묻습니다. – Derek

+0

내 대답을 편집했습니다. '.cells' 객체를 사용할 수있다 – JMax

+0

이것의 변형은 잘 동작한다! 다른 사람들도 알다시피,이 대답을 기반으로 내가 사용한 솔루션은 다음과 같습니다. 'Cells (3, i) .AutoFill Destination : = Range (Cells (3, i), Cells (NumberOfRows, i))' – Derek