Programmieren - alles kontrollieren 4.938 Themen, 20.667 Beiträge

Verfolgung starten Optionen

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
Was meinst Du mit Ausgaben als Euro? Willst Du einen String incl. ... Borlander
Ich möchte den niedrigsten Wert einer Zeile nicht Spalte ermitteln. Das ... neanderix
Hallo Borlander, es riecht nach einem unsauberen Design, ist aber keiner. Es ... PerryR
es riecht nach einem unsauberen Design, ist aber keiner. Es ist die einzige ... Borlander
es riecht nach einem unsauberen Design, ist aber keiner. Es ist die einzige ... neanderix
Hallo, Jetzt stinkts richtig. ich brauch ne Maske. Das ist dennoch kein ... ChrE
Manche können sich die Struktur ihrer Daten nicht aussuchen Das ist doch ... Borlander
Der Thread kann gerne geschlossen werden. Das Problem ist ganz einfach ... PerryR
Niemand wollte hier das dicke Pflichtenheft lesen. Die für die ... Borlander
Tachchen, doch nach dieser letzten Nachricht melde ich mich doch noch ... PerryR
ich gebe dir recht, die bisherigen Antworten waren doch sehr enttäuschend. ... neanderix
Es ist schon traurig... die jenigen die nicht helfen können oder auch nicht ... PerryR
Es geht hier nicht um die Struktur einer Datenbank, doch, geht es. und für ... neanderix
ChrE neanderix „ doch, geht es. Das ist deine völlig unmaßgebliche meinung. Fakt ist: es ist...“
Optionen

Hallo,

> Egal wie oft du noch wie ein Dreijähriger mit dem fuß aufstampfst.

Jetzt wirst du aber ziemlich frech.

Wie dem auch sein:
Excel sortiert gerne Spalten und nicht so gerne Zeilen.
Wie wäre es, wenn man die Zeile transponiert?

http://www.online-excel.de/excel/singsel.php?f=68

Also, wenn man die entsprechende Zeile insgesamt nimmt,
dann in ein leeres Tabellenblatt einfügt -

Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True

und danach die Spalte sortiert, dann sollte der oberste Wert der kleinste sein...
Das sollte manuell, als auch mittels Makro gehen.

Gruss

ChrE

bei Antwort benachrichtigen
die jenigen die nicht helfen können oder auch nicht wollen, sollten hier im ... Borlander