Ｅｘｃｅｌのマクロの記述について知りたい

質問

Ａ１が　"山中" 、Ａ２が "４０歳" となっている場合、マクロ記述 「activecell=A1」でアクテイブセルを「山中」にすることはできますが、同時にアクティブセルのひとつ下の行のセルを「４０歳」にする記述をおしえてください。

回答No.1

tom04 · ベストアンサー

こんばんは！

こういうことがご希望なのでしょうかね？

Sub test1()
With ActiveCell
.Value = Range("A1")
.Offset(1) = Range("A2")
End With
End Sub

または

Sub test2()
With ActiveCell
.Value = Range("A1")
.Offset(1) = Range("A1").Offset(1)
End With
End Sub

どちらも同じ動きになるはずです。

外していたらごめんなさいね。m(__)m

お礼

ありがとうございました。早いご回答、いま見ました。早速やってみます。