Avg-Funktion (Microsoft Access SQL)
Gilt für: Access 2013 | Access 2016
Berechnet das arithmetische Mittel einer Gruppe von Werten, die sich in einem Abfragefeld befinden.
Syntax
Avg(Ausdr)
Der Ausdr-Platzhalter stellt einen Zeichenfolgenausdruck dar, der das Feld angibt, in dem die numerischen Daten enthalten sind, deren Durchschnitt Sie ermitteln möchten, oder einen Ausdruck, der eine Berechnung auf der Basis der Daten in diesem Feld durchführt. Operanden im Ausdr-Platzhalter können den Namen eines Tabellenfelds, einer Konstante oder einer Funktion (bei der es sich um eine systemeigene oder benutzerdefinierte, jedoch nicht um eine andere SQL-Aggregatfunktion handeln darf) enthalten.
Hinweise
Bei dem von der Avg-Funktion berechneten Durchschnittswert handelt es sich um das arithmetische Mittel (die Summe der Werte dividiert durch die Anzahl von Werten). Mithilfe der Avg-Funktion können Sie beispielsweise die durchschnittlichen Frachtkosten berechnen.
Von der Avg-Funktion werden bei der Berechnung keine Null-Felder berücksichtigt.
Verwenden Sie Avg in einem Abfrageausdruck und in der SQL-Eigenschaft eines QueryDef-Objekts oder beim Erstellen eines Recordset-Objekts basierend auf einer SQL-Abfrage.
Beispiel
Im folgenden Beispiel werden in der Orders-Tabelle (Bestellungen) die durchschnittlichen Frachtkosten für Bestellungen mit Frachtkosten über $100 (100 €) berechnet.
In diesem Beispiel wird die EnumFields-Prozedur aufgerufen, die im Beispiel für die SELECT-Anweisung enthalten ist.
Sub AvgX()
Dim dbs As Database, rst As Recordset
' Modify this line to include the path to Northwind
' on your computer.
Set dbs = OpenDatabase("Northwind.mdb")
' Calculate the average freight charges for orders
' with freight charges over $100.
Set rst = dbs.OpenRecordset("SELECT Avg(Freight)" _
& " AS [Average Freight]" _
& " FROM Orders WHERE Freight > 100;")
' Populate the Recordset.
rst.MoveLast
' Call EnumFields to print the contents of the
' Recordset. Pass the Recordset object and desired
' field width.
EnumFields rst, 25
dbs.Close
End Sub
Siehe auch
- Access-Entwicklerforum
- Hilfe mit Access unter support.office.com
- Access-Foren auf UtterAccess
- Entwickler- und VBA-Programmierung (FMS)
- Access-Beiträge zu StackOverflow
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.