That sounds like you have a 2d array in which case tryCode:
Dim Sp As Variant Dim i As Long FeedbackArray = (Range("E3:E8").Value) For i = LBound(FeedbackArray) To UBound(FeedbackArray) Sp = Split(FeedbackArray(i, [COLOR=#ff0000]1[/COLOR])) If Sp(0) = "1" Or Sp(0) = "10" Then FeedbackArray(i, [COLOR=#ff0000]1[/COLOR]) = Sp(0) Next i
You wonderful human you.
Thanks, thats got it.
with my limited understanding of the code, I'm having to create multiple instances of this for each of the "columns" that I need to scan through, but thats still saving loads of time!