[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『同一注文番号をトリガーにループ処理をしたい』(Azuma)
1 2 3 4
こういったセル並びをしているcsvからデータを参照するマクロを組んでいます。
「1」の行に注文番号が入り、列をまたいで同注番が出ることはありません。
その上で
1. 先頭行に処理(1)、処理(2)を行う
2. 2行目の注文番号が上と同じなら処理(1)をスキップし処理(2)を行う
3. 3行目の注文番号が上と同じなら...
以降、上の行と異なるまでループ継続(最大50回)
4. n行目の注文番号が上と異なれば処理(1)、処理(2)を行う
5. n+1行目の注文番号が上と同じなら処理(1)をスキップし処理(2)を行う
6. n+2行目の注文番号が上と同じなら...
再度、上の行と異なるまでループ継続(最大50回)
こういう繰り返し処理を組みたいですが
「上の行と異なるまでループ継続」した上で次にループを始める
「上と異なったのでループを終えたセル」この場合は「n」行目を求める方法が思いつきません。
よろしくお願いします。
< 使用 Excel:Excel2010、使用 OS:Windows7 >
>注文番号が上と異なれば処理(1)、処理(2)を行う
For i = 2 To Cells(1, 1).End(xlDown).Row If Cells(i, 1).Value <> Cells(i - 1, 1).Value Then 処理1 End If 処理2 Next
(マナ) 2016/06/20(月) 23:43
ありがとう御座います!
(Azuma) 2016/06/23(木) 08:58
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.