(EXCEL-VBA) ¿Existen variables tipo CONJUNTO?

[jvchino]

Necesito verificar si una "Variable" es igual a "uno de ciertos valores" para realizar ciertas tareas.
Por ejemplo si la variable "indice" es igual a 1, 5, 8 o 9 entonces...

Si conocen un código que reemplace a este:

Código [Seleccionar] Expandir

If (indice=1) or (indice =5) or (indice=8) or (indice=9) Then

Por algo así :

Código [Seleccionar] Expandir

If indice IN [1,5,8,9] Then

Gracias y saludos.

[Danyfirex]

Puedes usar un case.

Código (vb) [Seleccionar] Expandir

Sub Test()
Dim iNumero As Integer
iNumero = 4
Select Case iNumero
Case 1, 5, 8, 9
     MsgBox "El número es valido: " + Str(iNumero)
     Case Else
     MsgBox "El número no es Valido"
End Select
End Sub


Saludos

[jvchino]

Gracias, es una buena opción.