VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Suchbegriff in Tabelle suchen und Fundzeilenindex zurückgeben

Gruppe

UDF

Bereich

Numerisch

Thema

Suchbegriff in Tabelle suchen und Fundzeilenindex zurückgeben

Problem

Ein Suchbegriff soll in einer mehrspaltigen Tabelle gesucht und der Fundstellenindex soll als Ergebnis zurückgegeben werden.

Lösung

Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.




StandardModule: basMain

Function mVergleich(varSearch As Variant, rng As Range) As String
   Dim var As Variant
   Dim iCol As Integer
   For iCol = 1 To rng.Columns.Count
      var = Application.Match(varSearch, rng.Columns(iCol), 0)
      If Not IsError(var) Then
         mVergleich = var & "," & iCol
         Exit Function
      End If
   Next iCol
End Function

    


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