version=1.0.0 vdate=27.02.2014 fname=udf_concatws.bas ns=%NAMESPACE% fpath=/vba/functions ====== [VBA] concat_ws() ====== //Diese Funktion verbindet Mehrere Elemente zu einem String. Das Trennzeichen kann mitgegeben werden. Sie ist sehr gut in SQL geeignet um aus mehreren Feldern ein Key zu erstellen // ==Version %%version%% - %%vdate%%== {{%%fname%%|Download %%fname%% (V-%%version%%)}} ===== Definition ===== Public Function concat_ws( _ ByVal iDelemiter As Variant, _ ParamArray items() As Variant _ ) As String ==== Parameters ==== ***iDelemiter** Das Trennzeichen/String, der zwischen die einzelnen Elemente gesetzt wird ***%%ParamArray%%** Die einzelnen Elemente ==== Return ==== Es wird ein String zurückgegeben ===== Anwendungsbeispiele ===== ==== In VBA ==== ?concat_ws("-", "a", 3, "foo", "bar") a-3-foo-bar === In MS Access-SQL === SELECT t.id, CONCAT_WS('#', t.entity, t.portfolio, t.account) AS key FROM booking AS t ===== Code =====