VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Bereiche auf Übereinstimmung vergleichen

Gruppe

UDF

Bereich

Bereich

Thema

Bereiche auf Übereinstimmung vergleichen

Problem

Wie kann ich feststellen, ob zwei Bereiche identische Werte haben?

Lösung

Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.




StandardModule: basMain

Function BereichVergleich(rngEins, rngZwei) As Boolean
  Dim rngCell As Range
  Dim iCounter As Integer
  Dim bln As Boolean
  For Each rngCell In rngEins
    iCounter = iCounter + 1
    If rngCell <> rngZwei.Cells(iCounter) Then
      bln = True
      Exit For
    End If
  Next rngCell
  If bln = False Then BereichVergleich = True
End Function

    


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