Macro para limpiar hoja y depurar

Buenas Expertos,

Tengo un fichero de clientes con 3300 líneas y quiero de año en año depurarlo, hay un valor el cual me permite hacerlo que es la columna QUE que contiene el valor de la facturación del cliente, si en la celda QUE el valor es 0 quiere decir que ese cliente no ha venido como mínimo desde hace 1 año.

Necesito de vuestra ayuda,, quiero hacer una macro que en la hoja llamada CLIENTES, borre todos los clientes que en la columna QUE el valor sea igual a 0 y deje el resto con el fin de hacer una depuración de la hoja.

Saludos

Respuesta
1

Dim fila as integer

for fila = 1 To 3300

If Cells(fila, 4).Value = "0" Then
Rows(fila).Delete
fila = fila - 1
End If
Next fila
End Sub
Sustituye el 4 por el número de orden que ocupe la columna "QUE"

Gracias por la aportación,  ha funcionado a la perfección. 

Pues haz el favor de valorar y cerrar la pregunta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Macro para bajar renglones

Me podrías ayudar con una macro que realize la siguiente función: Tengo un useform que pone datos en la celdas, y le hice un botón de aceptar, lo que quiero que haga ese botón es que me pocisione en la siguiente celda, por ejemplo: Escribo datos en...
2 respuestas

Macro para eliminar y copiar filas en otra hoja

Aquí, haciendo incursiones con las macros pero esto es muy complejo. Agradecería mucho su ayuda. Tengo 2 hojas de excel en un libro. En la hoja 1 tengo miles de filas y datos repartidos en 10 columnas. En la hoja 2 cientos de filas y datos repartidos...
1 respuesta

Macro para comparar datos de 2 libros de excel

Tengo una base la cual se alimenta con varios Excel... Llamemos les id (el num puede ser variable) yo tengo que comparar una columna de la base con una del id"el num es variable" y el dato de la casilla "a1" del id colocarlo en la columna "ah" de la...
1 respuesta

Macro con mensaje de duplicados

He intentado crear alguna fórmula para evitar insertar duplicados en una hoja de excel pero lo mejor que he podido hacer es usar la fórmula CONTAR. SI en la pestaña DATOS > VALIDAR DATOS. Sin embargo me gustaría crear una macro con un mensaje del...
1 respuesta

Macro para crear hojas con un nombre y copiar datos en ellas.

Necesito hacer una macro que copie datos e inserte hojas nuevas, apartir de la "Hoja1". En la "Hoja1" tengo una tabla de 14 columnas y 100 filas, La copia se debe de realizar según datos de la columna "A". Al ejecutar la macro, se buscan datos en la...
1 respuesta

Arrojar varios datos desde un criterio de búsqueda

Lo que necesito es: Yo tengo una columna (A1) con varios nombres de "Clientes", estos en algunos casos están repetidos y al frente en B1 tienen un # que es la factura de un producto "X", lo que quiero es buscar cualquier cliente en una celda de otra...
3 respuestas

Macro transponer cada por filas

Necesito una macro que todos los datos de una columna A que están ordenados cada 4 filas con: nombre, dirección, teléfono, espacio en blanco. Nombre2, direccion2, telefono2, espacio en blanco2. Nombre3, direccion3, telefono3, espacio en blanco3....
2 respuestas

Modificar código para ocultar columnas en excel

Ya había hecho una pregunta en relación: ¿Cómo puedo ocultar COLUMNAS con macros en excel? Pero seguí buscando y encontré este código que es lo que necesito, pero quiero que haga lo contrario, en este código: Private Sub Worksheet_Change(ByVal Target...
1 respuesta

Guardar estado de checkbox en datagridview

Tengo un datagridview en donde recupero información de una base de datos con un campo Bit el cual me lo muestra como un checkbox lo que necesito realizar es guardar el estado de esta columna ya que el usuario marca las lineas dándoles el visto bueno,...
1 respuesta

Auto ejecutar una macro

Quiero que se autoejecute una macro que tengo en un libro pero no se como ya que soy muy novato, el nombre de la macro es Private Sub Worksheet_Change(ByVal Target As Range).
1 respuesta