Ayudame con esta macro

En la hoja bloque he aumentado una columna y se daño (por favor me podrías ayudar arreglando)