Wps js宏根据条件删除指定行

Question

根据c列首行出现a或者b或者c或者d然后删除以上所有行。（不包含出现的abcd行）用wps中的js编写。

根据原来代码更改也行

Answer 1

var r;
var ran;
r = 0;
let C = Range("C:C").Find("A");
if (C) {
  r = C.Row;
  ran = "1:" + (r - 1).toString();
  Range(ran).Delete();
} else {
  let D = Range("C:C").Find("B");
  if (D) {
    r = D.Row;
    ran = "1:" + (r - 1).toString();
    Range(ran).Delete();
  } else {
    let E = Range("C:C").Find("C");
    if (E) {
      r = E.Row;
      ran = "1:" + (r - 1).toString();
      Range(ran).Delete();
    } else {
      let F = Range("C:C").Find("D");
      if (F) {
        r = F.Row;
        ran = "1:" + (r - 1).toString();
        Range(ran).Delete();
      }
    }
  }
}

这段代码首先查找C列中首次出现的字母（a、b、c、d），然后根据不同的情况删除该字母上面的所有行。如果首行不是a、b、c、d中的任何一个字母，则不会执行删除操作。