VBA: kan Select Case og If bruges sammen?

Prøv:
Sub test()
Dim xy, a, b
    xy = "01"
    a = 5
    b = 2
   
    Select Case xy
    Case Is = "01"
      If a < b Then
        Stop
      ElseIf a = b Then
        Stop
      Else
        Stop
      End If
    Case Is = "02"
        Stop
    End Select
End Sub

Det virker fint :-)
Har du nogle erfaring med hvorvidt Public Functions 'kører' hurtigere/mere effektivt ved brug af Select Case metode kombineret med If betingelser, fremfor If-logik i 4 niveauer?

Så vidt jeg har forstået kan Select Case kun bruges med én variabel (betingelse), og ikke flere, a la: Select Case xy And z, Case Is xy="01" And z>50
Er det korrekt forstået?

Vender tilbage....

http://sitestory.dk/excel_vba/select_case.htm

Så er det vist på plads - med hensyn til hastighed har jeg ingen erfaring i nævnte sammenhænge.