回答編集履歴
1
追記
answer
CHANGED
|
@@ -1,4 +1,9 @@
|
|
|
1
1
|
とりあえず、３列目を使うなら３列分のデータを格納する必要があると思います。
|
|
2
2
|
```VBA
|
|
3
3
|
Set rng2 = .Range(.Cells(3, 1), .Cells(Finalrow, 3))
|
|
4
|
+
```
|
|
5
|
+
Vlookupは左端列がSORTされている必要があります。代わりにIndex+Matchにしてみるのはどうでしょう。
|
|
6
|
+
```VBA
|
|
7
|
+
ws1.Cells(1, 1).Value = .Index(rng2, .Match(ws2.Cells(1, 1).Value, rng2.Columns(1), False), 3)
|
|
8
|
+
|
|
4
9
|
```
|