Arquivo da tag: Alertas

VBA – Evitando mensagens de alerta ao abrir e fechar arquivos

Veteranos do VBA sabem com alguma facilidade como realizar a manipulação de arquivos, por exemplo, do Excel, para abrir, ler dados e em seguida fechar o arquivo.

Um exemplo:

Set wbook = Application.Workbooks.Open("Arquivo.xls")
wbook.Sheets("PlanilhaOrigem").Range("A1:B10").Copy
ThisWorkbook.Sheets("`PlanilhaDestino").Paste
wbook.Close

Mas, vou aproveitar este caso específico que gera um pequeno problema. Pelo fato de copiar os dados da Arquivo.xls, ao executar a rotina Close, a mensagem:

“Deseja manter os conteúdos na área de transferência?”

O mesmo aconteceria se você alterasse o arquivo destino, com a diferença de que a mensagem seria a de salvar ou não o arquivo.

Como fazer para evitar essas mensagens? Simples!

Antes da instrução Close, basta colocar o seguinte:

Application.DisplayAlerts = False

O que a instrução faz? Ela inibe as mensagens de alerta do Office, executante determinadas ações sem que as telas de aviso interfiram no fluxo de execução do código.

A única atenção é não utilizá-lo indiscriminadamente, já que, se os avisos aparecem, é porque algo está potencialmente errado ou sendo perdido. Mas caso saiba exatamente o que está acontecendo no seu código, vá em frente.

Bom proveito!