reeks van "or" kan korter?

[brandernl]

Is het mogelijk om een reeks van OR statements, dus

IF waarde is OR A OR B OR C Then

te vervangen door een kortere?
In Crystal Reports Basic kan ik dat vervangen door

IF waarde IN (A, B, C) THEN

Mogelijk moet dat in een array, maar de help van Excel is niet echt toegankelijk hoe je een array moet gebruiken.

 

[Superzeeuw]

Onderstaande kan in Excel's VBA, ik hoop dat je dat bedoelt.
Korter kan het niet zover ik weet.

If [A1] Or [A2] Or [A3] Or [A4] = "Test" then msgbox "Klopt"

 

[brandernl]

Ha Superzeeuw,
Ik vrees dat ik je niet begrijp. Het komt op me over dat je de zaak omdraait.
Kan je wat toelichting geven?

 

[Superzeeuw]

Wat hier staat is:

If [A1] Or [A2] Or [A3] Or [A4] = "Test" then msgbox "Klopt"

Als de waarde "Test" voorkomt in cel A1 of cel A2 of cel A3 of cel A4 dan .....

Dat is toch wat jij vraagt?

Als ik iets verkeerd begrepen heb hoor ik het graag.

 

[Warme bakkertje]

Sub tst()
'onderstaande regels stellen de array samen
'dit kan ook door een bereik van je werkblad in te lezen
ReDim ALFA(1 To 3)
For x = 1 To 3
    ALFA(x) = x
Next
[A2] = ""
'hier wordt de vergelijking gemaakt met alle elementen uit de array
'en bij een match wordt naar een cel geschreven
For y = 1 To UBound(ALFA)
    If [A1] = ALFA(y) Then [A2] = "OK"
Next
End Sub

 

[brandernl]

heren,
Dank vu hulp
@superzeeuw, ik begrijp je nu code
@warme bakkertje (je bent er al vroeg bij); jouw code kan ik meer mee