Excel utiliza macros VBA para consultar valores que contienen contenido específico.

x = rango("A65536"). final (xlArriba). fila

ReDim arr(1 a x, 1 a 5)

brr = Range("a 1:E" & x)

Para i = 2 al límite inferior (brr)

si se retiene (celda (I, 5)). valor, 4) = "2002 " entonces

k = k 1

Para j = 1 a 5

arr(k, j) = brr(i , j)

Siguiente j

Terminará si...

Siguiente i

Range(" A1:E1 ") . Copiar papel 2. Rango("A1:E1")

Hoja2. rango ("A2"). Resize(k, 5) = arr

Conector final