title image


Smiley Re: Kleinster Wert aus mehreren Spalten
Folgende Funktion in ein neues Modul einfügen (Quelle: dbWiki)







Public Function fktMin(ParamArray P())

Dim V, I As Long

  V = Null

  For I = LBound(P) To UBound(P)

    If Not IsNumeric(V) Or (P(I) < V) Then V = P(I)

  Next I

  fktMin = V

End Function







Code eingefügt mit Syntaxhighlighter 4.0





in der Abfrage dann folgendes:



Min: zdouble(fktMin([Umsatz03];[Umsatz04];[Umsatz05]))



Gruß aus Wuppertal

Gruß aus Wuppertal
Stefan

-------------------------------------------------------------------------------
Soweit nicht anders angegeben, beziehen sich meine
Antworten auf WinXP SP2 und Access2003.
-------------------------------------------------------------------------------

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: