首页 文章

将组合配方转移到VBA中

提问于
浏览
-1

我在excel中有一个公式,即IF语句,vlookup和它们之间的组合,它们将使用循环编码在所有单元格中应用 .

这个公式:

= IF((VLOOKUP(G4;$A$4:$B$9;2;FALSE))=1;"terhubung";IF((VLOOKUP(G4;$A$4:$C$9;3;FALSE))=1;"unreach";IF((VLOOKUP(G4;$A$4:$D$9;4;FALSE))=1;"reject";IF((VLOOKUP(G4;$A$4:$E$9;5;FALSE))=1;"workload";""))))

关于公式的解释,我试着在这张图片中捕捉 .
image description here

问题是如何使用button_click将公式转换为vba编码

谢谢

1 回答

  • 0

    您可以用以下代码替换您的配方......

    =INDEX($B$3:$E$3,MATCH(1,INDEX($B$4:$E$9,MATCH(G4,$A$4:$A$9,0),),0))
    

    如果您想通过VBA插入公式并仅保留值,您可以尝试类似下面的内容 .

    Sub InsertFormula()
        Range("H4:H9").Formula = "=INDEX($B$3:$E$3,MATCH(1,INDEX($B$4:$E$9,MATCH(G4,$A$4:$A$9,0),),0))"
        Range("H4:H9").Value = Range("H4:H9").Value
    End Sub
    

相关问题