Tuve problemas con este ejercicio en lo relacionado con la ubicación del archivo por lo que use la expresión Debug.Print ActiveWorkbook.FullName para encontrarlo, con esto detecte que el archivo estaba guardado en la nube https://penol.......

Recomiendo esta expresión para no tener dudas al ubicar un archivo, sobre todo cuando se habla de programación.

Saludos