Búsqueda difusa de VBA en Excel

Después de las pruebas, se descubrió que el caso Select no puede ser juzgado por Me gusta.

Entonces debemos usar el método If en su lugar.

Gongzi Neirong()

Marcar I como un número entero

Recuento atenuado como un número entero

count = Sheets("sheet1 ") . [A1].Área actual.Número de filas.Recuento

Recuento para i = 1

Si a la celda (I, 1) le gusta "*película*", entonces a la celda (I, 2) = "canción"

Siguiente I

Conector final