Thema: Modalwert einer gefilterten Reihe berechnen

Download Beispiel-Arbeitsmappe

Home

Gruppe

Allgemein

Problem

Wie kann ich den Modalwert einer mit Autofilter gefilterten Zahlenreihe ermitteln?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub TeilMod()
   Dim rng As Range
   Dim dModal As Double
   Application.ScreenUpdating = False
   Set rng = Range("A2:A20").SpecialCells(xlCellTypeVisible)
   Workbooks.Add
   rng.Copy Range("A1")
   dModal = WorksheetFunction.Mode(Range("A1").CurrentRegion)
   ActiveWorkbook.Close savechanges:=False
   MsgBox "Modalwert: " & dModal
End Sub

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Filtern

Listbox filtern	Datensätze durch Bedingung filtern
Per Matrix Formel filtern	Suche in Autofiltern in verschiedenen Spalten
Diagramme nach mehreren Balken filtern	Liste mit mehreren Einträgen ausfiltern
Filtern oder Summewenn !?	Daten Filtern
Daten umstrukturieren / Filtern	MSGBox Zeitraum filtern
ausfiltern liste	Duplikate aus einer Tabelle filtern
Monat Filtern	Mit Change() o. Calculate() Filtern und Drucken
Filtern - Google Docs / Excell übertragen	Unterschiedliche Einträge herausfiltern+auflisten
Filtern per Makro	Excel "stolpert" beim wiederholten Filtern
Zahl aus Text filtern	Allgemeine Frage zur Fehlerbehandlung
Zeitraum filtern und getrennt speichern	allgemeine Fragen zu einer Datenbank
Filtern und sodann selektieren...	Listen-Aufstellung filtern und summieren
Daten automatisch filtern + auflisten	Daten aus Zeilen filtern und in Spalten kopieren?
ComboBoxDaten in Abhängigkeit filtern o. Userform	Postleitzahlen herausfiltern
Daten filtern	nur Zahlen aus beliebiger Zeichenkette filtern
Daten filtern	Text filtern
Blatt Filtern B Spalte und Zeileninhalt zusammenfü	Formel zum Filtern gesucht
allgemein	Filtern, aber wie?
Daten filtern	Nach Zeitraum filtern
Filtern,kopieren:beim Einfügen Formeln oder Werte	Bestimmte Einträge filtern
Filtern mit mind. 3 Bedingungen mit Und	gefilterte Liste erneut Filtern
Tabelle durchsuchen - Zeilen filtern	Zeilen aus Tabelle filtern & anzeigen
Filtern über ComboBoxen	Zeilen filtern
Filtern von Datum	Mittelwerte aus Tabelle herausfiltern
Doppelte ausfiltern	Doppelte Werte aus einer Zeile filtern