Eliminar filas vacías automáticamente con VBA

Si necesitamos eliminar varias filas en blanco, resulta muy laborioso hacerlo uno por uno, en estos casos podemos utilizar el siguiente código para automatizarlo con condigo VBA.


CODIGO
Sub EliminaFilasEnBlanco()
'seleccionamos las filas en blanco

Selection.SpecialCells(xlCellTypeBlanks).Select
'borra las filas seleccionadas
Selection.EntireRow.Delete
End Sub