Visual Basic para Aplicaciones - Ayuda macro de excel

Life is soft - evento anual de software empresarial
 
Vista:

Ayuda macro de excel

Publicado por Martín (47 intervenciones) el 17/12/2002 17:50:33
Hola,mi pregunta es como puedo hacer para indicarle a excel desde una macro que si una línea contiene datos no numericos los borre,es decir que recibo archivos de nóminas con datos como el número de empleado,el nombre y el importe pero a veces recibo archivos con encabezados,renglones con basura,etc.los cuales necesito que se borren sin tener que estar borrando uno por uno.

saludos y gracias de antemano.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda macro de excel

Publicado por Mauricio Baeza (262 intervenciones) el 18/12/2002 15:46:42
tu pregunta puede tener muchas variantes, por ejemplo, puedes evaluar solo una columna o varias, con el siguiente ejemplo evaluas la columna A hasta que encuentre una celda vacia, evalua cada celda y las que no son numericas las borras, CUIDADO, elimina TODA la fila, con esto puedes adaptarlo a tus necesidades, saludos...

Public Sub BorrarFilas3()
Range("A1").Activate
Do Until Trim(ActiveCell.Value) = ""
DoEvents
If Not IsNumeric(Trim(ActiveCell.Value)) Then
ActiveCell.EntireRow.Delete
Else
ActiveCell.Offset(1, 0).Activate
End If
Loop
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar