Guru do Excel e Power BI

Galera, esse formulario apresenta um erro ao abrir e gostaria da ajuda de vocês para corrigir isso se possível



https://planilhasvba.com.br/wp-content/ ... mbros.xlsm



Um amigo meu me pediu ajuda, mas to confuso

Esse é o código

'Private Sub Workbook_BeforeClose(Cancel As Boolean)
''Call DESCONDE
'ActiveWorkbook.Save
'End Sub
'
'Private Sub Workbook_Open()
'Call ESCONDE
'Frm_Cad.Show
'End Sub
Private Sub Workbook_Open()

End Sub