En este grupo En todos

Foro de Excel



Macro para seleccionar celdas que cumplen condicion

Raul
Sinaloa, México
Escrito por Raul Garcia Leyva
el 13/04/2009

Saludoa a todos...

estoy tratando de hacer una macro que de un rango especifico me selecciones solo las celdas que cumplan con una condicion.. En este caso las que tengan el resultado cero... Trate de hacerla con la opcion de grabacion de macro y valiendome de la funcion del menu edicion " ir a" pero no encontre la manera de especificar la condicion de las celdas con el dato cero, trate de hacerlo de esta manera ya que mis conocimientos de vb son minimos, si alquien es tan amable de asesorarme al respecto, de darme alguna pista de como lo puedo hacer le estare agradecido.. Gracias..

Abraham Valencia
Computacion e informatica microsoft mv...
Escrito por Abraham Valencia
el 13/04/2009

Y una vez seleccionados que deseas hacer?

Abraham

Raul Garcia Leyva
Sinaloa, México
Escrito por Raul Garcia Leyva
el 14/04/2009
"Y una vez seleccionados que deseas hacer?

Abraham
"

por Abraham :) (Abril 2009)

Suprimir su valor... Es para poder aplicar un filtro avanzado.
todos los datos de ese rango provienen de un pegado especial, el cual fue copiado de otro rango, en el que defino los criterios para el filtro avanzado, estos criterios los defino mediante formulas, en el caso de que cierta condicion no se cumple me devuelve cero. Al pasar estos datos al rango que el filtro avanzado tomara en cuenta, dicho filtro no funciona correctamente, solo funciona si suprimo los valores cero, trate de acerlo indicando a la formula que me devolviera "" cuando no se cumple la condicion, pero a pesar de que la celda aparece en blanco, excel toma esa celda como no vacia y por ello el filtro tampoco funciona de esta manera.. La parte en la que copio los datos donde puse formulas para sacar los criterios y pegarlos en otro rango y la parte del filtro avanzado ya lo tengo resuelto mediante vb..

solo me falta una rutina para seleccionar dicho rango.. K1:Q3 y que de ese rango me suprima el valor de las celdas que contienen cero, no que elimine la celda ( delete) sino que suprima (ClearContents)

por eso solo pedia la rutina para seleccionar celdas con valor cero de un rango especifico, y luego yo indicaria que suprimiera... Lo solicite asi porque a pesar de que tengo conocimientos minimos de vb, me gusta esforzarme para hacer las cosas.. Asi asimilo mas lo que hago.

gracias.

Abraham Valencia
Computacion e informatica microsoft mv...
Escrito por Abraham Valencia
el 14/04/2009

Si es especifico para valores 0, prueba algo asi:

Dim Celda as Range
For Each Celda In ActiveSheet. Range("K1:Q3")
If Celda = 0 Then
Celda. ClearContents
End If
Next Celda

Abraham

Raul Garcia Leyva
Sinaloa, México
Escrito por Raul Garcia Leyva
el 14/04/2009
"Si es especifico para valores 0, prueba algo asi:

Dim Celda as Range
For Each Celda In ActiveSheet. Range("K1:Q3")
If Celda = 0 Then
Celda. ClearContents
End If
Next Celda

Abraham
"

por Abraham :) (Abril 2009)

Pues la adapte a lo que tengo y me ha funcionado a la perfeccion..

agradezco tu ayuda..

saludos.

Abraham Valencia
Computacion e informatica microsoft mv...
Escrito por Abraham Valencia
el 15/04/2009

Listo, de nada, cierro el tema

Abraham