Propriedade Application.DisplayAlerts (Excel)
True se o Microsoft Excel exibir determinados alertas e mensagens durante a execução de uma macro. Boolean de leitura/gravação.
Sintaxe
expressão.DisplayAlerts
expressão Uma variável que representa um Aplicativo objeto.
Comentários
O valor padrão é True. Defina essa propriedade como False para suprimir avisos e mensagens de alerta durante a execução de uma macro; quando uma mensagem exigirem uma resposta, o Microsoft Excel escolhe a resposta padrão.
Se você definir essa propriedade como Falsa, o Microsoft Excel definirá essa propriedade como Verdadeira quando o código for finalizado, a menos que você esteja executando código de processo cruzado.
Observação
Ao usar o método SaveAs para pastas de trabalho para substituir um arquivo existente, a caixa de diálogo Confirmar Salvar como terá como padrão Não, embora a resposta Sim seja selecionada pelo Excel quando a propriedade DisplayAlerts estiver definida como Falsa. A resposta Sim substitui o arquivo existente.
Ao usar o método SaveAs para pastas de trabalho para salvar uma pasta de trabalho que contém um projeto Visual Basic for Applications (VBA) no formato de arquivo do Excel 5.0/95, a caixa de diálogo Microsoft Excel tem um padrão Sim, embora a resposta Cancelar seja selecionada pelo Excel quando a propriedade DisplayAlerts estiver definida como Falsa. Não é possível salvar uma pasta de trabalho que contém um projeto em VBA usando o formato de arquivo do Excel 5.0/95.
Exemplo
Este exemplo fecha a pasta de trabalho Pasta1.xls e não solicita que o usuário salve as alterações. As alterações em Pasta1 não são salvas.
Application.DisplayAlerts = False
Workbooks("BOOK1.XLS").Close
Application.DisplayAlerts = True
Este exemplo suprime a mensagem que, caso contrário, aparecerá quando você iniciar um canal DDE para um aplicativo que não esteja em execução.
Application.DisplayAlerts = False
channelNumber = Application.DDEInitiate( _
app:="WinWord", _
topic:="C:\WINWORD\FORMLETR.DOC")
Application.DisplayAlerts = True
Application.DDEExecute channelNumber, "[FILEPRINT]"
Application.DDETerminate channelNumber
Application.DisplayAlerts = True
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.