質問編集履歴
1
書式の改善、画像の挿入
test
CHANGED
@@ -1 +1 @@
|
|
1
|
-
|
1
|
+
vlookupでの範囲を別シートにすると『実行時エラー '1004' :WorkSheetFunction クラスの VLookup プロパティを取得できません。』が発生
|
test
CHANGED
@@ -12,15 +12,7 @@
|
|
12
12
|
|
13
13
|
"examplelist"
|
14
14
|
|
15
|
-
1 リンゴ
|
16
|
-
|
17
|
-
2 バナナ
|
18
|
-
|
19
|
-
3 マンゴー
|
20
|
-
|
21
|
-
4 オレンジ
|
22
|
-
|
23
|
-
5
|
15
|
+

|
24
16
|
|
25
17
|
|
26
18
|
|
@@ -40,7 +32,13 @@
|
|
40
32
|
|
41
33
|
vlookup関数で選択した値とそれに紐づく値の切り替えをしたいが、範囲指定がうまくいかず、『実行時エラー '1004' :WorkSheetFunction クラスの VLookup プロパティを取得できません。』が発生して処理が停止する。
|
42
34
|
|
35
|
+
```ここに言語を入力
|
36
|
+
|
43
|
-
|
37
|
+
selectedNum = WorksheetFunction.VLookup(selectedNa, tbl, 1, False)
|
38
|
+
|
39
|
+
```
|
40
|
+
|
41
|
+
で処理が止まるので、"tbl"に問題がありそう。
|
44
42
|
|
45
43
|
|
46
44
|
|
@@ -49,6 +47,8 @@
|
|
49
47
|
|
50
48
|
|
51
49
|
(VBA)
|
50
|
+
|
51
|
+
```ここに言語を入力
|
52
52
|
|
53
53
|
Private Sub Worksheet_Change(ByVal Target As Range)
|
54
54
|
|
@@ -78,6 +78,8 @@
|
|
78
78
|
|
79
79
|
End If
|
80
80
|
|
81
|
+
```
|
82
|
+
|
81
83
|
End Sub
|
82
84
|
|
83
85
|
|
@@ -88,13 +90,7 @@
|
|
88
90
|
|
89
91
|
ローカルウィンドウで式を見たところ、以下のようになった。
|
90
92
|
|
91
|
-
+ : tbl : : Range/Range
|
92
|
-
|
93
|
-
: selectedNa : "マンゴー" : Variant/String
|
94
|
-
|
95
|
-
|
93
|
+

|
96
|
-
|
97
|
-
|
98
94
|
|
99
95
|
WorksheetFunction.VLookupをapplication.vlookupに変更してみた。
|
100
96
|
|