Colección de citas famosas - Slogan de motivación - EXCEL busca múltiples condiciones a través de VBA.

EXCEL busca múltiples condiciones a través de VBA.

subsearch()

I es un número entero, j es un número entero

Arr1 = hoja de trabajo("Archivo"). range("a 1:d"; paper("file").cell(row.count,"one").end(xlup).row)

Arr2 = hoja de trabajo("find "). range("a 1:d"; hojas("find").cell(rows.count,"one").end(xlup).row)

Para i = 1 hasta el límite inferior ( arr2 )

Para j = 1 al límite inferior (arr1)

Si arr 2(A, 1) = arr 1(A 1) y arr 2(B, 2) = arr 1(B, 2), entonces

arr 2(iD 4) = arr 1(D, 4)

Ir a 100

Si... terminará

entonces

arr 2(D, 4) = ""

100:

entonces

Sábanas ("buscar"). range("a 1:d"; hojas("find"). cell(rows. count, "d"). end(xlup). row = arr 2.

Conector final

p>