回答編集履歴
1
コードの修正
test
CHANGED
|
@@ -12,16 +12,8 @@
|
|
|
12
12
|
|
|
13
13
|
```VB
|
|
14
14
|
|
|
15
|
-
For R = 1 To ws.Cells(Rows.Count, "A").End(xlUp).Row
|
|
16
|
-
|
|
17
15
|
If S2.Cells(R, "C").Value = ws.Cells(Rows.Count, "A")Then
|
|
18
|
-
|
|
19
|
-
S2.Cells(R, "A").Value = ws.Cells(Rows.Count, "A")
|
|
20
|
-
|
|
21
|
-
End If
|
|
22
|
-
|
|
23
|
-
Next R
|
|
24
16
|
|
|
25
17
|
```
|
|
26
18
|
|
|
27
|
-
"値一致シート"と"値の元"シートの比較行が適切なのであればいいのですが、
|
|
19
|
+
"値一致シート"と"値の元"シートの比較行が適切なのであればいいのですが、対象行が「Rows.Count」というのはおかしいのではないかと思ったので。
|