version=1.3.0
vdate=11.09.2014
fname=udf_inset.bas
ns=%NAMESPACE%
fpath=/vba/functions
{{keywords>vba,dictionary,cast,create dictionary,function}}
{{description>Diese Funktion erstellt auf verschiedene Arten ein Dictionary. V-%%version%%}}
====== [VBA] inSet() ======
//Diese Funktion dient als IN(),wie man sie in vielen anderen Sprachen kennt. Sie kann aber auch ein in_array() abdecken.
//
==Version %%version%% %%vdate%%==
{{%%fname%%|Download %%fname%% (V-%%version%%)}}
===== Definition =====
found = inSet(search, value1 [,value2... [,value#]])
found = inSet(search, valueList)Public Function inSet(ByRef iSearch As Variant, ParamArray iItems() As Variant) As Boolean
==== Parameters ====
***iSearch** Wert der gesucht wird
***%%ParamArray iItems%%*** Werte gegen die geprüft wird. Sind die Werte Arrays, werden die Arrays durchsucht
==== Rückgabewert ====
True oder False. Je nachdem ob der Wert in der Menge ist oder nicht
===== Beispiele =====
debug.print inset(2, 1, 2, 3) ' true
debug.print inset(2, array(1, 2, 3)) ' true
debug.print inset(2, array(1, 2), 3) ' true
debug.print inset(3, array(1, 2), 3) ' true
debug.print inset("d", "a,b,c,d,e") ' true
===== Code =====