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")

[EDIT]または：

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

2011-10-25 13:34:45 JMax

は範囲が各列に変更する必要がありますか？つまりRange（ "A2：A12"）を毎回置くかRange（ "B2：B12"）などに更新する必要がありますか？私は文字ではなく列番号を扱っているので私は尋ねる。 – Derek

私は自分の答えを編集しました。 '.cells'オブジェクトを使うことができます – JMax

これは変わったものです！他の人が知っているので、この回答に基づいて私が使用した解決策は次のとおりです。 'Cells（3、i）.AutoFill Destination：= Range（Cells（3、i）、Cells（NumberOfRows、i））' – Derek

答えて