Sumar datos filtrados al final de la lista de datos

Estoy trabajando en una hoja excel con datos filtrados, lo que no logro es como sumar el rango de datos filtrados en la ultima celda vacía de ese rango de celdas, que en mis datos seria la columna E, hasta el momento solo he conseguido seleccionar las celdas que deseo sumar en el filtro con el siguiente código:

Fila_Final = Range("E" & Cells.Rows.Count).End(xlUp).Row
Rango = Range("E6:E" & Fila_Final).Select

Pero se me complico el asunto para sumar esos valores seleccionados.