Macro que YA FUNCIONA pero tengo que quitar ciertas columnas!

Buenas tardes expertos pues verán mi macro ya funciona, pero no se porque tengo que eliminar ciertas columnas para que me funcione al 100%.

La macro que tengo funciona solo si yo elimino todas las columnas que están en verde, pero estas columnas son necesarias para realizar otros cálculos.

Lo que hace esta macro es en base al filtro de la columna A (rango de fechas) con las celdas visibles aplicar la formula de promedio, en la columna que tenga cierto encabezado (el cual asigno yo), ya que, nunca tienen el mismo orden, ni el mismo rango.

Gracias, anexo link.

Saludos.

https://www.dropbox.com/s/oleftomuclhw4a1/Promedio.xls