Macro para borrar filas y columnas filtradas

Hola, necesito por favor una macro que me borre las filas y las columnas que quedan ocultas después de aplicar un filtro.