using an array in a Like statement

D

Drayel

Joined
Apr 25, 2010
Messages
1
Reaction score
0
I am trying to make an like statement that checks the contents of an array to the contents of a cell and if it finds the statement to be true, it will edit the value of another cell. The array are all the values that i want to check for.

Code: 
MANUAL [1] = "1635*"
 MANUAL [2] = "1643*"  '(there are 22 other elements of the array)
 
 For i = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
 	For r=1 to 2 
 		  If Range("B" & i) Like(MANUAL [r]) Then Range("L" & i) = "MANUAL ALLOCATION"
 	Next
 Next

Thanks
Drayel
 
Back
Top