回答編集履歴

2

訂正)勘違いによるコードミスを修正

2017/01/25 03:08

投稿

takito
takito

スコア3111

test CHANGED
@@ -26,18 +26,26 @@
26
26
 
27
27
 
28
28
 
29
- 参照先の変化に `i` を使いたいので
29
+ ```
30
+
31
+ Workbooks.Open op.Range("C2").Offset(i - 1, 0).Value '参照先セルを固定してオフセットで変化
32
+
33
+ ```
34
+
35
+
36
+
37
+ または
30
38
 
31
39
 
32
40
 
33
41
  ```
34
42
 
35
- Workbooks.Open op.Range("C" & (i + 1)).Offset(i - 1, 0).Value
43
+ Workbooks.Open op.Range("C" & (i+1)).Value '参照先セルそのものが変化しているのでオフセット不要
36
44
 
37
45
  ```
38
46
 
39
47
 
40
48
 
41
- うような処置が必要です
49
+ が正しいです
42
50
 
43
51
 

1

追記)参考として改良版を追記

2017/01/25 03:08

投稿

takito
takito

スコア3111

test CHANGED
@@ -23,3 +23,21 @@
23
23
 
24
24
 
25
25
  ファイルパス情報は`C2`から入っているので参照場所が間違っています
26
+
27
+
28
+
29
+ 参照先の変化に `i` を使いたいので
30
+
31
+
32
+
33
+ ```
34
+
35
+ Workbooks.Open op.Range("C" & (i + 1)).Offset(i - 1, 0).Value
36
+
37
+ ```
38
+
39
+
40
+
41
+ というような処置が必要です
42
+
43
+