You are reading a single comment by @kicks66 and its replies. Click here to read the full conversation.
  • edit: sorted

    [code]
    Sub OperatorProp()

    For i = 3 To 500

    For j = 3 To 1727
        If Cells(j, "C") = Cells(i, "H") Then
         myStr = myStr & Cells(j, "B") & ", "
         End If
    

    Next j
    Range("I" & i).Value = myStr
    myStr = ""
    Next i

    End Sub
    [/code]

    But is there a way to get the code to keep going until the end of the list without entering in the first and last value of the for loop?

About

Avatar for kicks66 @kicks66 started