[Resolvido]Problemas com mensagens em formulário

Olá PessoALL

Envio algumas mensagens num formulário trocando a propriedade Caption de um controle, para informar ao usuário as etapas de processamento.

Acontece que algumas não aparecem devido a velocidade do processamento.

Entre uma mensagem e outra usei a função Sleep mas não adiantou.

Ex. do Processamento
' Inclui os registros do Excel NfeAutoRE.xlsx na tabela NFE
Mensagem ("Incluindo Arquivo NFE...") ' Troca mensagem na tela de processamento
DoCmd.TransferSpreadsheet acImport, 8, "NFE", Diretorio & "\NFE\NfeAutoRE.xlsx", True

Ex. Procedimento da mensagem
' Mensagem na tela
'
Function Mensagem(texto As String)
[Form_Menu].Processa.Caption = texto
SleepPls (1)
End Function

Mas 1 é muito pouco. É um milésimo de segundo. Tente aumentar esse tempo.

Neste caso o 1 desta função já está convertido em segundos.

Posso colocar o número que for que ele aguarda o tempo solicitado mas a mensagem que neste caso seria "Incluindo Arquivo NFE..." não aparece e sim uma outra depois de zerar regitro de 4 tabelas.

O que parece é que as instruções são executadas paralelamente e quando a instrução da mensagem vai ser executada já tem outra mensagem a ser mostrada.

Será que pode ser algo com a atualização da tela.

Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.