回答編集履歴
1
コードの間違い修正
test
CHANGED
@@ -7,7 +7,7 @@
|
|
7
7
|
他のRangeも同様に。Sheets("XXXXXX") が繰り返されるのが冗長と感じるなら、With を使うか変数にするといいでしょう。
|
8
8
|
|
9
9
|
```vba
|
10
|
-
Dim ws1 As WorkSheet, ws2 A
|
10
|
+
Dim ws1 As WorkSheet, ws2 As WorkSheet
|
11
11
|
Set ws1 = Sheets("情報付与後")
|
12
12
|
Set ws2 = Sheets("一覧表")
|
13
13
|
|