VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Vergleich von zwei Listen und Ausgabe eines Wahrheitswertes

Gruppe

UDF

Bereich

Bereich

Thema

Vergleich von zwei Listen und Ausgabe eines Wahrheitswertes

Problem

Die benutzerdefinierte Funktion in Zelle C1 soll prüfen, ob alle Werte im Bereich A in Bereich B enthalten sind.

Lösung

Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.




StandardModule: Modul1

Function IstKomplett(rngA As Range, rngB As Range) As Boolean
   Dim rng As Range
   Dim var As Variant
   Dim bln As Boolean
   For Each rng In rngA
      var = Application.Match(rng.Value, rngB, 0)
      If IsError(var) Then
         bln = True
         Exit Function
      End If
   Next rng
   IstKomplett = Not bln
End Function

    


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