Evento Application.OptionsPagesAdd (Outlook)

Ocorre sempre que o usuário clica no botão Opções de Suplemento na guia Suplementos da caixa de diálogo Opções do Outlook.

Sintaxe

expression. OptionsPagesAdd( _Pages_ , _Folder_ )

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Pages	Obrigatório	Propertypages	A coleção de páginas de propriedade adicionada à caixa de diálogo. Essa coleção inclui apenas páginas de propriedade personalizadas. Ela não inclui páginas de propriedade padrão do Microsoft Outlook.
Folder	Obrigatório	Propertypages	Este argumento é usado apenas com o objeto Folder. O objeto de pasta para a qual está sendo aberta a caixa de diálogo de Propriedades.

Comentários

Esse evento não está disponível no VBScript (Microsoft Visual Basic Scripting Edition).

Seu programa manipula esse evento para adicionar uma página de propriedades personalizada. A página de propriedade será adicionada à caixa de diálogo Opções. Quando o evento é acionado, o objeto da coleção PropertyPages identificado pela Pages contém as páginas de propriedades que foram adicionadas antes do manipulador de eventos está sendo chamado. Para adicionar sua página de propriedades à coleção, use o método Add da coleção PropertyPages antes de sair do manipulador de eventos.

Exemplo

Este exemplo do VBA (Microsoft Visual Basic for Applications) adiciona uma nova página de propriedades à caixa de diálogo Opções do Outlook. O código de exemplo deve ser colocado em um módulo de classe de um suplemento COM (Component Object Model). Para obter informações sobre suplementos COM, consulte Personalizando o Outlook usando suplementos COM.

Implements IDTExtensibility2 
Private WithEvents OutlApp As Outlook.Application 
 
Private Sub IDTExtensibility2_OnConnection(ByVal Application As Object, ByVal ConnectMode As AddInDesignerObjects.ext_ConnectMode, ByVal AddInInst As Object, custom() As Variant) 
 Set OutlApp = Outlook.Application 
End Sub 
 
Private Sub OutlApp_OptionsPagesAdd(ByVal Pages As Outlook.PropertyPages) 
 Pages.Add "PPE.SimplePage", "Simple Page" 
 'PPE.SimplePage is a ProgID of the registered ActiveX Control - the property page that is to be displayed in the COM add-in 
End Sub

Confira também

Objeto de Aplicativo

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.