Excel 2010 VBA自動填充整列

我無法讓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分鐘，但是當我手動執行這個過程時，所需時間並不多，所以我認爲必須有一個更快的方法。

非常感謝您的幫助！

2011-10-25 Derek

您可以嘗試使用Autofill與目標範圍。

喜歡的東西：

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

[編輯]或者：

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

2011-10-25 13:34:45 JMax

請問範圍需要與每列改變？即每次必須放置範圍（「A2：A12」）還是將其更新爲範圍（「B2：B12」）等等？我問，因爲我正在處理列號而不是字母。 – Derek

我編輯了我的答案。你可以使用'.cells'對象 – JMax

這個工作的變種很好！所以其他人知道，基於這個答案我使用的解決方案是： 'Cells（3，i）.AutoFill Destination：= Range（Cells（3，i），Cells（NumberOfRows，i））' – Derek

回答