回答編集履歴

1

追記

2018/03/15 09:39

投稿

momon-ga
momon-ga

スコア4820

test CHANGED
@@ -3,3 +3,23 @@
3
3
 
4
4
 
5
5
  あとは、iの値がわからないですが、そもそもループに入ってないとかありませんか?
6
+
7
+
8
+
9
+ 追記
10
+
11
+ i、jは期待した値とのことなので・・・
12
+
13
+
14
+
15
+ ```VBA
16
+
17
+ Do While (i <= r)
18
+
19
+ Debug.print sheet.Cells(r, 7).Value
20
+
21
+ If sheet.Cells(r, 7).Value = "ABC" Then
22
+
23
+ ```
24
+
25
+ で、期待した値か表示されるか確認してみてはどうでしょう。