¿Cómo eliminar la referencia y usar el código vba para cada máquina?

Como sugirió, he hecho cambios pero todavía no puedo hacerlo fácil de usar o puede decir que cada vez que tenga que usar este código tengo que activar Scripting Runtime en diferentes computadoras. Por favor sugiera y corrija mi código lo antes posible. Sub GetFileNamesandPageCount() Option...