Nirelko

Sub FindMatchedValues()
    Dim sheetName As String
    Dim startIndex As Integer
    Dim itemsAmount As Integer
    Dim targetValue As Integer
    Dim indicatorLetter As String
    Dim valuesLetter As String
    Dim values As Range
    Dim matchedValuesLetter As String
    Dim matchedValuesStartIndex As String