s = InputBox("削除する文字列を入力してください。"); if (s == "") { return; } for (y = Bottom; y >= 1; y--) { for (x = 1; x <= Right; x++) { if (pos([x,y], s) > 0) { DeleteRow(y); continue; } } }