VBA - Updating a ProcessBar from module - Error 800100007

Question

I want to call a process bar from the module main and update the bar from main. I have in my UserForm1:

• Label5 with the max