Anónimo
Macro para buscar
Hola experto, tengo el siguiente excel:
A B C D E F G H I J K L
Bueno malo regular bueno malo regular
jorge 1 1 2 jorge 1 1 2
carlos 4 2 1 carlos 4 2 1
Jose n/a N/a n/a
AL LADO DERECHO TENGO UNA TABLA DINÁMICA (empieza en la columna G), quiero hacer una macro en que me busque "jorge" en la columna G por ejemplo y el valor que esta en la columna H (1) me lo coloque en la columna "B", el valor que esta en la columna "J" (2) lo coloque en la columna "D", ahoracomo veras en la columna "A" hay tres nombres de la cuales "jose" no se encuentra en la tabla dinámica y como no esta me bota un #N/A en vez de eso quiero que me bote "cero", yo hice una fórmula que es esta:
cells(14,"G") = "= IF(ISNA(VLOOKUP($F$14,2,FALSE)),"0",VLOOKUP($F$14,$N$14:$T$600,2,FALSE))"
cells(14,"G").calculate
Osea hago que en la celda G14 me copie la fórmula y luego con .calulate me lo calcule, esa fórmula funciona si lo hago manual, pero cuando lo pongo en una macro me sale un erro que dices se esperaba fin de la instrucción y el error muestra en "0", esa fórmula yo lo copiaba en cada campo, quisiera hacer una do while que busque y me lo coloque para no estar copiando la fórmula en cada celda.
Gracias, espero que me hayas entendido
A B C D E F G H I J K L
Bueno malo regular bueno malo regular
jorge 1 1 2 jorge 1 1 2
carlos 4 2 1 carlos 4 2 1
Jose n/a N/a n/a
AL LADO DERECHO TENGO UNA TABLA DINÁMICA (empieza en la columna G), quiero hacer una macro en que me busque "jorge" en la columna G por ejemplo y el valor que esta en la columna H (1) me lo coloque en la columna "B", el valor que esta en la columna "J" (2) lo coloque en la columna "D", ahoracomo veras en la columna "A" hay tres nombres de la cuales "jose" no se encuentra en la tabla dinámica y como no esta me bota un #N/A en vez de eso quiero que me bote "cero", yo hice una fórmula que es esta:
cells(14,"G") = "= IF(ISNA(VLOOKUP($F$14,2,FALSE)),"0",VLOOKUP($F$14,$N$14:$T$600,2,FALSE))"
cells(14,"G").calculate
Osea hago que en la celda G14 me copie la fórmula y luego con .calulate me lo calcule, esa fórmula funciona si lo hago manual, pero cuando lo pongo en una macro me sale un erro que dices se esperaba fin de la instrucción y el error muestra en "0", esa fórmula yo lo copiaba en cada campo, quisiera hacer una do while que busque y me lo coloque para no estar copiando la fórmula en cada celda.
Gracias, espero que me hayas entendido
