Evento Application.WorkbookAfterSave (Excel)

Ocorre antes de a pasta de trabalho ser salva.

Observação

No Office 365, o Excel dá suporte ao AutoSave, que permite que as edições do usuário sejam salvas automaticamente e continuamente. Para obter mais informações, confira Como o AutoSave afeta suplementos e macros para garantir que o código em execução em resposta às funções de evento WorkbookAfterSave , conforme pretendido quando o AutoSave estiver habilitado.

Sintaxe

expressão. WorkbookAfterSave (Wb, Success)

expressão Uma variável que representa um Aplicativo objeto.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Wb	Obrigatório	Workbook	A pasta de trabalho sendo salva.
Success	Obrigatório	Boolean	Retorna True se a operação de salvamento tiver sido bem-sucedida; caso contrário, False.

Valor de retorno

Nada

Comentários

Para obter informações sobre como usar procedimentos de evento com o objeto Application , consulte Usando eventos com o objeto Application.

Exemplo

O exemplo de código a seguir exibe uma caixa de mensagem se a pasta de trabalho for salva com sucesso. Esse código deve ser colocado em um módulo de classe e uma instância dessa classe deve ser inicializada corretamente.

Private Sub App_WorkbookAfterSave(ByVal Wb As Workbook, _ 
 ByVal Success As Boolean) 
If Success Then 
 MsgBox ("The " & Wb.Name & " workbook was successfully saved.") 
End If 
End Sub

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.