アクセスクエリ - いくつかの列のmaxiumを取得する方法

Question

私は約20列のクエリを持っており、最後の列に最大量を取得したい。 iif(a>b,a,iif(b>c,b,c))を試しましたが、a、b、cはいずれの注文でも表示されていないため動作しません。
私が使用できる数式はありますか？

Answer 1

次のユーザー定義関数（UDF）を使用することができます：あなたのVBAモジュールMyFnc（それはそれを作成し、存在しない場合）と、使用中にそれを置く

Function Max(ParamArray a() As Variant) As Variant 

    Max = Empty ' return value in case of no supplied parameters 
    Dim i As Integer 
    For i = LBound(a) To UBound(a) 
     If i = LBound(a) Then 
     Max = a(i) 
     Else 
     If Max < a(i) Then Max = a(i) 
     End If 
    Next i 

End Function 

をその結果は

Max(a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, q, r, s, t) 

となります。これは20列の使用に適しています。