質問編集履歴
1
不要な変数、空行を消しました
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -58,15 +58,11 @@
|
|
|
58
58
|
|
|
59
59
|
Sub マクロ()
|
|
60
60
|
|
|
61
|
-
|
|
62
|
-
|
|
63
61
|
|
|
64
62
|
|
|
65
63
|
Dim rng As Range
|
|
66
64
|
|
|
67
65
|
Dim i As Long
|
|
68
|
-
|
|
69
|
-
Dim count As Long
|
|
70
66
|
|
|
71
67
|
Dim ary As Variant
|
|
72
68
|
|
|
@@ -98,10 +94,6 @@
|
|
|
98
94
|
|
|
99
95
|
End If
|
|
100
96
|
|
|
101
|
-
|
|
102
|
-
|
|
103
|
-
|
|
104
|
-
|
|
105
97
|
Next
|
|
106
98
|
|
|
107
99
|
|