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
De nuevo yo! Como puedo decir con una macro que elimine las fila que contengan texto y no numero, gracias!
Saludos
1 Respuesta
Respuesta de hugolaza
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
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
