HERBERS Excel-Forum - die Beispiele

Thema: Vorkommen von Zahlenreihen in Spalten

Home

Gruppe

UDF

Problem

Wie kann ich festellen, in wieviel Spalten bestimmte Zahlenreihen erscheinen?

Lösung
Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.
StandardModule: basMain

Function HowMuch(rng As Range, ParamArray Data()) As Integer
   Dim vTest As Variant
   Dim iCol As Integer, iCounter As Integer
   Dim iCount As Integer
   Dim bln As Boolean
   For iCol = 1 To rng.Columns.Count
      For iCounter = 0 To UBound(Data)
         vTest = Application.Match(Data(iCounter), _
            rng.Columns(iCol), 0)
         If IsError(vTest) Then
            bln = True
            Exit For
         End If
      Next iCounter
      If bln = False Then
         iCount = iCount + 1
      Else
         bln = False
      End If
   Next iCol
   HowMuch = iCount
End Function

Beiträge aus dem Excel-Forum zu den Themen UDF und Bereich

Dynamischer Datenbereich im Diagramm Bereich als Bild speichern.
1. freie Zelle in nicht zusammenhängenden Bereich Bestimmtheitsmass nach vorgegebenen Bereich
Bestimmten Bereich anhand Zeilenabgabe kopieren Bereich löschen
Array - Index außerhalb des gültigen Bereichs zoom auf Druckbereichsbreite anpassen
Bereich syncronisieren II Zeilenbereich auf Tabelle übertragen
Druchbereiche auf eine Seite Definitionsbereich
Bereich von rechts nach links auslesen? Namen definieren für bestimmten Bereich
Nur einen Eintrag im Bereich zulassen Kommentar in erste zelle einess Bereiches
bedingte Formatierung für zellenbereich Summewenn mit abhängigen Bereichen
Bereiche in separates sheet Summewenn mit abhängigen Bereichen
Absturz bei lokalen Bereichsnamen Teilbereich einer Zelle einfärben
Abfrage ob Druckbereich zu groß für Seitenbreite Lohnsteuerberechnung (UDF, XLM-Datei, Webabfrage)
Gruppierten Bereich sperren Bestimmte Zahlen aus einem Bereich
Bereich nur unter best. Voraussetzg. summieren Name eine benannten Bereiches finden
Farbigen Rangebereich auswählen Wert-Suche in Bereich
Bereich als Grafik speichern Zeile löschen in Bereich
variablen Druckbereich definieren Wertebereich definieren
Vergleich Datum in CB mit Datum in einem Bereich Zeilen und Spalten von Bereich markieren
verlinkungen in markiertem bereich erneuern Differenz zweier Summe im dynamischen Bereich
Zelbereiche(Matrizen) an Variablen zuweisen Ergebnis UDF ändert, wenn Tabelle deaktiviert wird
Löschen eines Bereiches Höchsten Wert aus einem Bereich auslesen
bereichsnamen mit indirekt zusammensetzen UDF soll nicht auf Daten anderer Dateien zugreifen
Copy - paste von Zellbereich in Tabelle abfangen per Makro markierten Bereich auslesen
Teilbereich einer Arbeitsmappe speichern Summenprodukt und Namensbereich
Vorkommen von Werten eines Bereiches zählen vor Ausführung einer UDF Zwischenspeicher "retten&