User Tools

Site Tools


vba:functions:concat_ws

This is an old revision of the document!


[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

Definition

Public Function concat_ws( _
        ByVal iDelemiter As Variant, _
        ParamArray items() As Variant _
) As String

Parameters

  • iDelemiter Das Trennzeichen/String, der ziesch 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

_concat_ws.bas
'/**
' * Fügt mehrere Elemente mit einem Trennstring zu einem String zusammen
' * @param  Variant         Delemiter
' * @param  ParamArray      Die verschiedenen Elemente
' * @return String
' */
Public Function concat_ws( _
        ByVal iDelemiter As Variant, _
        ParamArray items() As Variant _
) As String
    concat_ws = Join(items, CStr(iDelemiter))
End Function
vba/functions/concat_ws.1399537904.txt.gz · Last modified: 08.05.2014 10:31:44 by yaslaw