Excel 行追加禁止をしたい。

シート毎に行追加を禁止したいと思っているのが、
方法はありますでしょうか？
vbaでもなんでもいいのですが、
宜しくお願いします。


Excel2000です。

No.1 回答者： bluepenguin 回答日時： 2008/05/02 11:05

[ツール]→[保護]→[シートの保護]として、

ユーザーに許可してもいい操作をチェックして
（この場合だと、「行の追加」以外はチェックかな？）
「OK」ボタンをクリックしてみてください。

No.2 回答者： mshr1962 回答日時： 2008/05/02 11:40

#1の方のはExcel2002以降の機能ですので2000では出来ません。

一番単純なのは、最後の行(65536)に、何か入力しておくことです。
そうすれば、追加時にエラーメッセージがでて追加できませんから

No.3 ベストアンサー 回答者： imogasi 回答日時： 2008/05/02 17:41

メニューの、挿入ー行のサブメニューをなくす方法

Sub test07()
Dim b As menubar
MsgBox Application.MenuBars(xlWorksheet).Menus(4).MenuItems(2).Caption
Application.MenuBars(xlWorksheet).Menus(4).MenuItems(2).Delete
End Sub
ーー
リセット
Sub ResetMenuBar()
Application.CommandBars("Worksheet Menu Bar").Reset
End Sub
ーー
上記のMenus(4).MenuItems(2).の４や２は質問者の場合に挿入、行かどうか確認してください（Delete行のコードをコメント化して、無効にし、Msgbox でCaptionの文字を確認してください）
ーー
もともとメニューをいじくっている（追加削除などしている）場合は後半のResetMenuBar()の効果が心配です。
挿入ー行のメニューだけを加えれれば（復活すれば）よいのだが、良くわからない。すみません。
http://www.geocities.jp/happy_ngi/YNxv295.html

No.4 回答者： imogasi 回答日時： 2008/05/02 17:45

#3です。

質問には「シート毎に」とあるのを見落としていました。
＃３はApplication＝エクセル全体の設定になる問題です。
すみません、無視してください。

No.5 回答者： marbin 回答日時： 2008/05/02 20:01

A65536に何か入力しておくとか。

行削除してしまったらA65536が上の行に繰り上がるので
だめですが。