Ocultar columnas y filas por condición y agrupar por email

Para Dante

Necesitaría una macro como la anterior. Necesito una macro que oculte las filas que en la columna I sean diferentes de Reclamado, oculte las columnas, A C DE E I J QUE L M, agrupe por valores únicos de la columna, seleccione el rango resultante y lo mande por email en el cuerpo del email y después lo restaure todo a visible de nuevo, ¿esto es posible?