vbaで関数を連続コピーする。vbaでオートフィル機能を使う方法。

A列に空白がない行が連続入力されていることが前提で、B列の2行目に関数を設定し、A列の最終行まで、連続コピーする。
vbaでオートフィル機能を使う方法。

Range("B2").Value = "= A2 & A2"

----- べんりあつめ。-----

Dim xxx As Integer
xxx = Range("A2").End(xlDown).Row
Range(ActiveSheet.Cells(2, 2), ActiveSheet.Cells(xxx, 2)).Select
Selection.FillDown

End Sub