如何在Excel VBA中選擇案例？

Question

鑑於

Select Case cmd 

    case "ONE": MsgBox "one" 

    case "TWO": MsgBox "two" 

    case "THREE": MsgBox "three" 

End select 

我的要求是，如果cmd = "ONE"我需要"one"然後"two"不過目前顯示我正在"one"顯示，然後程序被打破了選擇案例...

Answer 1

Select Case cmd 
    case "ONE", "TWO": 
        if cmd = "ONE" THEN 
         MsgBox "one" 
        end if 
        MsgBox "two" 

    case "THREE": MsgBox "three" 

End select 

Answer 2

一些如果可以做這項工作：

If cmd = "ONE" Then 
    MsgBox "one" 
    cmd = "TWO" 
End If 
If cmd = "TWO" Then 
    MsgBox "two" 
    cmd = "THREE" 
End If 
If Cmd = "THREE" Then 
    MsgBox "three" 
End If 

Answer 3

這是設計。 http://msdn.microsoft.com/en-us/library/ee177199%28PROT.10%29.aspx

您可以嘗試使用'goto'或過程調用來解決它。

Answer 4

你只需要很長的路要走。

Select Case cmd 

    case "ONE": MsgBox "one" 
        MsgBox "two" 
        MsgBox "three" 

    case "TWO": MsgBox "two" 
        MsgBox "three" 

    case "THREE": MsgBox "three" 

End select 

Answer 5

爲什麼使用Select Case來做這件事？你所做的只是打印「cmd」值的小寫版本。

If cmd = "ONE" Then 
    MsgBox LCase$(cmd) 
    MsgBox "two" 
Else 
    Msgbox LCase$(cmd) 
End If 

Answer 6

GoTo會工作的很好，我想。

Select Case cmd 

    Case "ONE" 
     MsgBox "one" 
     GoTo AfterONE: 

    Case "TWO" 
AfterONE: 
     MsgBox "two" 

    Case "THREE" 
     MsgBox "three" 

End Select 

它的工作原理;我測試了它。