text = InputBoxMultiLine("抽出するデータを改行区切りで入力してください"); if(text == "") { return; } text = "\n" + text + "\n"; for(y=Bottom; y>=1; y--) { if(pos(text, "\n" + [1,y] + "\n") == 0) { DeleteRow(y); } }