回答編集履歴
1
追記
test
CHANGED
|
@@ -11,3 +11,9 @@
|
|
|
11
11
|
+ For Each AddList In inputSh.Range("A2:A" & LastRow)
|
|
12
12
|
|
|
13
13
|
```
|
|
14
|
+
|
|
15
|
+
|
|
16
|
+
|
|
17
|
+
あと、`RefdataSh.Range("A" & "r").Value`でもエラーが出そうですね。
|
|
18
|
+
|
|
19
|
+
`RefdataSh.Range("A" & r).Value`と修正してみてください。
|