excelでのマクロ 一定条件での停止

質問

初めて投稿させていただいております。

＜自分のレベル＞
マクロ(VBA)については初心者で、自分で操作をして、
自動生成されるプログラムを多少改変できる程度。

＜excel version＞
excel 2000

＜教えていただきたい事＞
カーソルのある行に行挿入するマクロを作ったですが、
このとき、８行目より前にカーソルがある場合に、
メッセージを表示して、そのマクロを停止したいのですが
どのようなプログラムを書けば良いでしょうか？

よろしくお願いします。

回答No.1

noname#122067 · ベストアンサー

↓こんな感じでどうでしょうか？

Private Sub CommandButton1_Click()
If (Selection.Row < 8) Then
MsgBox ("８行目より前には挿入できません")
Else
Rows(Selection.Row).Insert Shift:=xlDown
End If
End Sub