Programmieren - alles kontrollieren 4.934 Themen, 20.613 Beiträge

Access Modele Visual Basic - Ergebnis als EURO ausgeben

PerryR / 15 Antworten / Flachansicht Nickles

Moin alle zusammen.

Folgende Problemstellung

Ich habe eine Accessabfrage die aus mehren Zeilen besteht. Ich möchte den niedrigsten Wert einer Zeile (nicht Spalte) ermitteln. Das Ergebnis soll als Euro ausgegeben werden

Der niedrigste Wert wird mit folgender Lösung ausgegeben. Mein Problem ist aber, das ich das Ergebnis als als Euro haben möchte, damit ich in einer weiteren Abfrage verschiedene EURO- Werte mit dieser vergleichen kann.


Folgende Lösung habe ich auf die Reihe bekommen.


Public Function MeinMin(ParamArray MeineWerte() As Variant)
Dim lngIndex


If UBound(MeineWerte) >= 0 Then
MeinMin = MeineWerte(0)
For lngIndex = 1 To UBound(MeineWerte)
If (MeineWerte(lngIndex) MeinMin = MeineWerte(lngIndex)
Next lngIndex
End If
End Function

bei Antwort benachrichtigen
Borlander PerryR „Es ist schon traurig... die jenigen die nicht helfen können oder auch nicht...“
Optionen
die jenigen die nicht helfen können oder auch nicht wollen, sollten hier im Threadeinfach nicht zu Wort melden.
Am Willen mangelt es nicht, das können ist von der Mithilfe und dem ernsthaften Willen sich helfen lassen zu wollen abhängig...

Sätze wie Eine Grundsatzausbildung über Datenbankenstrukturen habe ich mir vor ein paar Jahre anhören müssen. lassen bei mir auch gewisse Zweifel daran aufkommen ob eine hinreichende Motivation sich eigenständig eingehender mit dem Thema auseinandersetzen existiert.


Gruß
Borlander
bei Antwort benachrichtigen