Public Function ParamArrayDelegated(ParamArray prms() As Variant) As Variant
    Dim arrPrms() As Variant, arrWrk() As Variant
    'When prms(0) is Array, supposed is delegated from another function
    On Error GoTo ErrorHandler
    arrPrms = prms
    If UBound(arrPrms) >= 0 Then
        Do While VarType(arrPrms(0)) >= vbArray And UBound(arrPrms) < 1
            arrWrk = arrPrms(0)
            arrPrms = arrWrk
            If UBound(arrPrms) < 0 Then
                Exit Do
            End If
        Loop
    End If
    ParamArrayDelegated = arrPrms
ExitHere:
    Exit Function
ErrorHandler:
    Debug.Assert Not (STOP_AT_ERROR And IS_DEV) '>> remove in release
    Err.Raise Err.Number, "ParamArrayDelegated of bas_Utilities", Err.Description & vbCrLf & "in ParamArrayDelegated of bas_Utilities at " & Erl
    Resume '>> remove in release
End Function