Evento Application.WorkbookAfterSave (Excel)

Ocorre antes de a pasta de trabalho ser salva.

Observação

No Office 365, o Excel suporta a funcionalidade Guardar Automaticamente, o que permite que as edições do utilizador sejam guardadas de forma automática e contínua. Para obter mais informações, veja How AutoSave impacts add-ins and macros to ensure that running code in response to the WorkbookAfterSave event functions as intended when AutoSave is enabled.

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	Devolve Verdadeiro se a operação de guardar tiver sido efetuada com êxito; caso contrário, Falso.

Valor de retorno

Nada

Comentários

Para obter informações sobre como utilizar procedimentos de eventos com o objeto Aplicação , veja Utilizar eventos com o objeto Aplicação.

Exemplo

O exemplo de código a seguir exibe uma caixa de mensagem se a pasta de trabalho for salva com sucesso. Este código tem de ser colocado num módulo de classe e uma instância dessa classe tem de 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.