Estoy trabajando con una macro y lo que quiero hacer es comparar los valores de una columna contra los valores en un arreglo y si lo encuentra eliminar la fila completa, lo que no se es la instrucción para buscar el valor, mi código:
Dim i, c, last_row As Integer
Dim myarray As Variant
Dim Product As String
myarray = Array("J8031A#ACC", "J8031A#ACQ", "A2W80A")
last_row = wsMissingSCM2.Range("A22").End(xlDown).Row
For c = 22 To last_row
Product = wsMissingSCM2.Cells(c, 4).Value
**If IsArray(Product) Then** 'Tengo este codigo pero no me funciona
Rows(c).EntireRow.Delete
End If
Next c