回答編集履歴
2
追記
test
CHANGED
|
@@ -1,3 +1,11 @@
|
|
|
1
|
+
セルは基本「ロックされている状態」が基本です。
|
|
2
|
+
|
|
3
|
+
なので一旦、シート上の全てのセルを初期化して、
|
|
4
|
+
|
|
5
|
+
改めて入力していいセルだけ解除するように考えてはいかがでしょうか？
|
|
6
|
+
|
|
7
|
+
|
|
8
|
+
|
|
1
9
|
Sheet1のモジュールに以下のコードをコピペ
|
|
2
10
|
|
|
3
11
|
|
1
追記
test
CHANGED
|
@@ -49,3 +49,23 @@
|
|
|
49
49
|
|
|
50
50
|
|
|
51
51
|
[第124回.Workbookのイベントプロシージャー](https://excel-ubara.com/excelvba1/EXCELVBA424.html)
|
|
52
|
+
|
|
53
|
+
|
|
54
|
+
|
|
55
|
+
> 'E最大セル「E65536」から↑で行番号を取得
|
|
56
|
+
|
|
57
|
+
> maxrow = Range("E65536").End(xlUp).Row
|
|
58
|
+
|
|
59
|
+
|
|
60
|
+
|
|
61
|
+
それから、エクセルのシートの最大行数は、65536行目ではありません。
|
|
62
|
+
|
|
63
|
+
それは、2003以前の行数です。
|
|
64
|
+
|
|
65
|
+
|
|
66
|
+
|
|
67
|
+
Worksheets(1).rows.count
|
|
68
|
+
|
|
69
|
+
|
|
70
|
+
|
|
71
|
+
というようにして、行の数を数えましょう。
|