質問編集履歴

5

修正

2017/01/17 15:08

投稿

marutoki
marutoki

スコア16

test CHANGED
File without changes
test CHANGED
@@ -51,14 +51,6 @@
51
51
 
52
52
 
53
53
  あと、別ブックにはフィルターやマクロが入っていますが、影響を及ぼすことはありますか?
54
-
55
-
56
-
57
- 【追記の追記】
58
-
59
- 別ブックの検索列にあってアクティブシートにない数値が存在するからかもしれません。
60
-
61
- 関係ないですかね?
62
54
 
63
55
 
64
56
 

4

追記の追記

2017/01/17 15:08

投稿

marutoki
marutoki

スコア16

test CHANGED
File without changes
test CHANGED
@@ -51,6 +51,14 @@
51
51
 
52
52
 
53
53
  あと、別ブックにはフィルターやマクロが入っていますが、影響を及ぼすことはありますか?
54
+
55
+
56
+
57
+ 【追記の追記】
58
+
59
+ 別ブックの検索列にあってアクティブシートにない数値が存在するからかもしれません。
60
+
61
+ 関係ないですかね?
54
62
 
55
63
 
56
64
 

3

追記

2017/01/17 14:41

投稿

marutoki
marutoki

スコア16

test CHANGED
File without changes
test CHANGED
@@ -4,7 +4,7 @@
4
4
 
5
5
  下記コードで、一致⇒抽出⇒転記まではできたのですが、
6
6
 
7
- 列で一致していない値が入った行まで値が入ってしまいます。
7
+ 各列で一致していない値が入った行まで値が入ってしまいます。
8
8
 
9
9
  なぜなのかさっぱり分かりません。
10
10
 
@@ -36,9 +36,11 @@
36
36
 
37
37
 
38
38
 
39
- なのですが、**30~309行目に300行で転記した情報が入ってしまいます。
39
+ なのですが、30~309行目に300行で転記した情報が入ってしまいます。
40
40
 
41
+ つまり、一度一致したら次の一致が見つかるまで転記を繰り返す状態になっているようです。
42
+
41
- **エラー時の処理としてVLookupコードの下に
43
+ エラー時の処理としてVLookupコードの下に
42
44
 
43
45
  On Error GoTo 0
44
46
 

2

追記

2017/01/17 14:28

投稿

marutoki
marutoki

スコア16

test CHANGED
File without changes
test CHANGED
@@ -45,6 +45,10 @@
45
45
 
46
46
 
47
47
  とか入れると「型が一致しません」と出ます。
48
+
49
+
50
+
51
+ あと、別ブックにはフィルターやマクロが入っていますが、影響を及ぼすことはありますか?
48
52
 
49
53
 
50
54
 

1

追記

2017/01/17 14:24

投稿

marutoki
marutoki

スコア16

test CHANGED
@@ -1 +1 @@
1
- マクロ VBA 別ブックA列の値と一致した時、任意のセルに値を転記(VLookup)
1
+ マクロ VBA 別ブックA列の値と一致した時、任意のセルに値を転記(VLookup)で転記が変
test CHANGED
@@ -10,7 +10,41 @@
10
10
 
11
11
 
12
12
 
13
- A列の値は13ケタのJANコードです。
13
+ 一致させる値は13ケタのJANコードです。
14
+
15
+
16
+
17
+ 【追記】
18
+
19
+ もう少し詳細に症状を・・・
20
+
21
+ 結局何が原因か分かりません・・・#N/Aとかは出ないんですが。
22
+
23
+ On Error Resume Next
24
+
25
+ で片方の検索列が空白だった場合飛ばすようにしています。
26
+
27
+ 実際途中までは空白なのですが、
28
+
29
+ 例えば、
30
+
31
+ 300行目が一致、E,F,G列に値が入る。
32
+
33
+ 次に、
34
+
35
+ 310行目が一致、E,G,F列に値が入る。
36
+
37
+
38
+
39
+ なのですが、**300~309行目に300行で転記した情報が入ってしまいます。
40
+
41
+ **エラー時の処理としてVLookupコードの下に
42
+
43
+ On Error GoTo 0
44
+
45
+
46
+
47
+ とか入れると「型が一致しません」と出ます。
14
48
 
15
49
 
16
50