o erro acontece pq macros de pasta não aceita chamadas de objetos "sem certeza"

é só criar uma macro para abrir o form e fazer a chamada em vez de abrir diretamente

em um modulo

Sub iniForm()
    UserForm_abertura.Show
End Sub

e na macro de abertura...

Private Sub Workbook_Open()
Application.AutomationSecurity = msoAutomationSecurityLow

   ' UserForm_abertura.Show  '    tirar essa linha

Call iniForm ' colocar essa

Call Aplicativo_invisivel

End Sub

desculpe, como foi o primeiro erro que apareceu eu me enganei
o erro é no relatório certo?

o erro parece ser nessa linha

cbx_lote_piloto.RowSource = "piloto!A3:B" & lin1
em
Private Sub UserForm_Initialize()

não achei o cbx_lote_piloto

como tentou atribuir uma propriedade de objeto não existente deu esse erro

aperte F8 até aparecer o erro

Boa noite Edcronos,

Você me ajudou e muito, realmente muito obrigado!!!! Realmente era na linha o erro.

Mais uma vez, muito obrigado!!!