Informar del error en el código fuente: Barra de progreso en barra de estado de Excel

Este sencillo código presenta una barra de progreso en la barra de estado de Excel, se probo en Microsoft Excel 2013 y funcionó perfectamente sin retrasar en demasía el código de la rutina. Es tan fácil de implementar que son cinco líneas de código y tendremos un anti stress en nuestras rutinas.
Lleva el nombre de "Sub El_Nombre_de_su_Sub() " el cual debe ser cambiado por quien lo vaya a usar por nombre de la rutina que lo necesite y corresponda en su proyecto. para una demostración abra un libro de Excel nuevo, insértele un modulo, copie este código y péguelo en el modulo, coloque un botón en la hoja asígnele este macro y pruébelo. Por su amable atención, muchas gracias.