マクロについて質問です。

質問

行を選択し、マクロボタンを押すと、選択行が一つ上に移動
行を選択し、マクロボタンを押すと、選択行が一つ下に移動
というマクロを教えていただきたいです。よろしくお願いします。

回答No.1

watabe007 · ベストアンサー

行を選択し、マクロボタンを押すと、選択行が一つ上に移動
Rows(Selection.Row - 1).Select
行を選択し、マクロボタンを押すと、選択行が一つ下に移動
Rows(Selection.Row + 1).Select

お礼

回答ありがとうございました。

補足

複数行を選択した一番上の行数から-1というのはどうしたらいいでしょうか。

回答No.3

mar00

選択行が一つ上に移動
Sub Macro1()
If ActiveCell.Row = 1 Then Exit Sub
Rows(ActiveCell.Row - 1).Select
End Sub

選択行が一つ下に移動
Sub Macro2()
If ActiveCell.Row = Rows.Count Then Exit Sub
Rows(ActiveCell.Row + 1).Select
End Sub

If ActiveCell.Row = Rows.Count Then Exit Subは
エクセルの最終行が選択されているという事は
ないと思いますが念のため。

お礼

回答ありがとうございました。

回答No.2

High_Score

マクロの自動作成で作ると早いです。
マクロの記録開始ボタン
相対参照オン
現在の選択セルの一つ上の行を選択
終了
Ctrl＋mで起動するよう登録

同じ要領で下行選択も記録しCtrl＋nで登録

お礼

回答ありがとうございました。