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