Macro ordenar por nombre e insentar fila si encuentra otro nombre, enviar estos por mail

Necesito una macro que realice lo siguiente:

En una base de datos situada en hoja1 se debe ordenar por columna A un tola de 10 columnas y una vez ordenada se debe insertar una línea vacías para separar los datos en este casos serán nombre de funcionarios, por lo tanto mientras sea el mismo nombre bajara y una vez encontrado un nombre distinto deberá insertar un fila para separar estos nombres. Esto hasta el final de la base. Una vez realizado se debe comparar cada primer nombre de cada rango y enviar correo según una tabla que contiene estos nombre y su mail asociados.