Guru do Excel e Power BI

Bom dia! Estou tentando encontrar o erro mas não consigo ver.
Em anexo a planilha. Na Planilha Orçamento de um clic no quadro em B1 "ENCERRAR ORÇAMENTO"
a macro roda ate certo ponto e para.
Alguem poderia analisar este erro pra mim por favor.
Na tela de login use PAULO e a senha é 12
Caso precise a pasta esta protegida com a senha 311070
Obrigado

Mudei o argumento LookAt do método Find para xlPart e passou a encontrar a palavra Pessoal.

Valeu mesmo pela ajuda.