Gruppe
Funktion
Problem
Wie sind die SVERWEIS-, WVERWEIS- und Matrixformeln zu handhaben?
StandardModule: Modul1
Function NoEmptysVL(vSearch As Variant, rngSearch As Range, iCol As Integer) As Variant
Dim iRow As Integer
For iRow = 1 To rngSearch.Rows.Count
If rngSearch.Cells(iRow, 1).Value = vSearch And Not IsEmpty(rngSearch.Cells(iRow, iCol)) Then
NoEmptysVL = rngSearch.Cells(iRow, iCol).Value
Exit Function
End If
Next iRow
NoEmptysVL = "#NV"
End Function