Macro para eliminar filas que contengan texto

Hola!
De nuevo yo! Como puedo decir con una macro que elimine las fila que contengan texto y no numero, gracias!
Saludos

1 Respuesta

Respuesta
1
Suponemos que los datos se encuentran desde A1 .
Coloca la rutina que te estoy enviando en un módulo de Visual Basic. ¿Cómo?
     * Abre el Editor de Visual Basic Alt-F11
     * En el Menú de Opciones, haz click en el Menu Insertar y luego selecciona Módulo.
     *En el módulo que aparece, copia el siguiente código
Sub EliminarTexto()
Range("A1").Select
Do While ActiveCell <> ""
If IsNumeric(ActiveCell) Then
    ActiveCell.Offset(1, 0).Select
Else
    ActiveCell.EntireRow.Delete
End If
Loop
End Sub
      * Cierra el Editor de Visual Basic
Ahora ejecuta la macro así:
     * Alt-F8 - selecciona EliminarTexto - Ejecutar

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas