すぐに役立つエクセルVBAマクロ集 FAQ セル移動方向を変更

　すぐマク　YNxv96926

選択したセルを左または右に数セル動かすには？

Ｑuestion 56.6　範囲選択

簡単な質問ですみません。
データ最後の場所まで移動させ、それから左又は右に数セル動かす方法を教えて下さい。
行の場合は、最後のデータから１行下げる方法はＳlection.End(xlＤown).Ｓelect を入力後
Ｓlection.Offset(myGyou + 1).Activate で出来ました。
急いでいます。よろしくお願いいたします。

Ａnswer　　

500連発をご愛読、ありがとうございます。
質問対象となるマクロ番号の入力をお忘れのようですが、188番「最終行及び範囲を取得する」（宮本耕治氏担当）と、183番「Offsetメソッドによるセル指定」（井領邦弘氏担当）のあたりを参考になさっているのかと推測します。

お急ぎと言うことですし、「１行下げる方法は出来た」と言うことですので、Offsetプロパティの引数の指定方法を解説すればよいかと思いますが、それについては既にMacroのページに掲載済みです。

くわしいことは「8) 選択範囲をオフセットする（ずらす）」をご覧いただければ、お分かりいただけるかと思います。

アクティブセルへ入力後に次のセルに移動（下方向）させるには？

Ｑuestion 56.93　範囲選択

Excel VBA Borad （掲示板）より

一つ教えてください。簡単なことだと思うのですがなかなかうまくいきません（参考資料を見ながら探しています）。

エクセルの中にオブジェクトでボタンを作成して、これを押すと丸印がアクティブセルに入力するところまで出来ているのですが！ボタンを押して丸印が入力され、次のセルに移動（下方向）させるところまでできたらいいなと思っています。
コードを知っていたら教えていただけないでしょうか！宜しくお願いいたします。

Ａnswer　　Excel 97以上

2002.12.16　よっしー

初めまして。こんなのはどうでしょうか？

Private Sub 「ボタン」_Click()
    ＜ボタンをクリックしたらアクティブセルに○を付ける仕事＞
    ActiveCell.Offset(1, 0).Activate
End Sub

「Activate」のところを「Select」にしても多分動きます。どう違うのか、私も初心者なのでわかんないです。(^_^;)

ありがとうございました

すっきりいたしました。おかげさまでもやもやしていたものがとれたっていう感じです。
私も初心者ですので、これからいろいろと勉強して、アドバイスが出来るように頑張りたいと思います。お世話になりました。

http://www.geocities.jp/happy_ngi/