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