質問編集履歴
2
コードにend subがなかったので追加
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -50,7 +50,7 @@
|
|
|
50
50
|
|
|
51
51
|
Set CPr = ActiveCell.Address(RowAbsolute:=False, ColumnAbsolute:=False) '座標を変数に格納
|
|
52
52
|
|
|
53
|
-
|
|
53
|
+
End Sub
|
|
54
54
|
|
|
55
55
|
```
|
|
56
56
|
|
1
Excelの使用環境を追記しました。
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -5,6 +5,12 @@
|
|
|
5
5
|
・コマンド内容の処理
|
|
6
6
|
|
|
7
7
|
・エラーの解決
|
|
8
|
+
|
|
9
|
+
|
|
10
|
+
|
|
11
|
+
######<環境>(追記)
|
|
12
|
+
|
|
13
|
+
Office 365 バージョン1910(ビルド12130.20410 クイック実行)
|
|
8
14
|
|
|
9
15
|
|
|
10
16
|
|