小编act*_*o99的帖子

我在这段代码中遗漏了什么:"如果没有错误,还有什么?"

我正在尝试运行此代码,该代码首先声明wsD,然后WsS依赖于"数据"选项卡中的单元格.我一直在接受

否则没有错误.

Set wsD = ThisWorkbook.Sheets("Data")

    If wsD.Range("C4") = "AL" Then Set wsS = ThisWorkbook.Sheets("AL_Sim")
    ElseIf wsD.Range("C4") = "COLL" Then Set wsS = ThisWorkbook.Sheets("COLL_Sim")
    ElseIf wsD.Range("C4") = "COMP" Then Set wsS = ThisWorkbook.Sheets("COMP_Sim")
    ElseIf wsD.Range("C4") = "GL" Then Set wsS = ThisWorkbook.Sheets("GL_Sim")
    ElseIf wsD.Range("C4") = "EPL" Then Set wsS = ThisWorkbook.Sheets("EPL_Sim")
    ElseIf wsD.Range("C4") = "LAW" Then Set wsS = ThisWorkbook.Sheets("LAW_Sim")
    ElseIf wsD.Range("C4") = "POL" Then Set wsS = ThisWorkbook.Sheets("POL_Sim")

    End If
Next
Run Code Online (Sandbox Code Playgroud)

excel vba if-statement

3
推荐指数
3
解决办法
174
查看次数

标签 统计

excel ×1

if-statement ×1

vba ×1