我在转移到VBA Excel中的其他列时遇到了麻烦

时间:2018-06-07 18:17:34

标签: excel vba loops

我有1个excel工作簿,它在工作表1(ws1)中的A列中有文字,如: Original file 我需要找到同一工作簿中包含的几个单词,但在另一个工作表ws2中: words to find 我想要的结果是: result expected

在VBA中我正在做:

ActiveWorksheet是ws2

def apply[T](in: T): js.Object = macro macroImpl

def macroImpl(c: blackbox.Context)(in: c.Tree): c.Tree = {
  import c.universe._

  object traverser extends Traverser {
    var methods = List[Symbol]()

    override def traverse(tree: Tree): Unit = tree match {
      case t@DefDef(modifiers, name, typeParams, paramss, returnType, body) if name != termNames.CONSTRUCTOR && !modifiers.hasFlag(Flag.PRIVATE) =>
        methods = t.symbol :: methods
        // your logic with t, t.symbol, name, paramss, returnType, body etc.
        super.traverseTrees(typeParams)
        super.traverseTreess(paramss)
        super.traverse(returnType)
        super.traverse(body)
      case _ => super.traverse(tree)
    }
  }

  traverser.traverse(in)

  println(s"methods: ${traverser.methods}")

  q"""
      scala.scalajs.js.Dynamic.literal()
   """
}

但是我遇到了转移到第二个& +列并重新开始检查。 任何想法?

提前致谢!

0 个答案:

没有答案