Excelについての質問です。

画像

Excel64閲覧xmlns="http://www.w3.org/2000/svg">250

ベストアンサー

0
画像

マクロの方はIDが一致したときに Worksheets("sheet1").Cells(i, 70).Value = 1 で一度1が入っているのですが 次の行を判定したときにIDがない場合 Worksheets("sheet1").Cells(i, 70).Value = 0 で上書きされてしまっています IDが一致したときはそこでFor-Nextを終わらせないといけません Worksheets("sheet1").Cells(i, 70).Value = 1 Exit For としましょう

ThanksImg質問者からのお礼コメント

たくさん教えてくださりありがとうございます! なんとか動きました。

お礼日時:5/20 12:03

その他の回答(1件)