Macro para eliminar hojas vacías o en blanco

Estoy tratando de conseguir una macro para eliminar todas las hojas vacías del libro, es decir que no tienen datos, formatos gráficos y ningún tipo de dato, ¿alguna idea?