Método View.Apply (Outlook)
Aplica o modo de exibição para a interface do usuário Microsoft Outlook.
Sintaxe
expressão. Aplicar
Expressão Uma variável que representa um objeto View .
Comentários
Para redefinir o modo de exibição atual corretamente, você deve fazer uma View.Reset e, em seguida, um View.Apply. O exemplo de código a seguir ilustra a ordem das chamadas:
Sub ResetView()
Dim v as Outlook.View
' Save a reference to the current view object
Set v = Application.ActiveExplorer.CurrentView
' Reset and then apply the current view
v.Reset
v.Apply
End Sub
Exemplo
O exemplo de aplicativo Visual Basic for Applications (VBA) a seguir cria e aplica um novo modo de exibição chamado New Table e o aplica.
Sub CreateView()
'Creates a new view
Dim objName As Outlook.NameSpace
Dim objViews As Outlook.Views
Dim objNewView As Outlook.View
Set objName = Application.GetNamespace("MAPI")
Set objViews = objName.GetDefaultFolder(olFolderInbox).Views
Set objNewView = objViews.Add(Name:="New Table", _
ViewType:=olTableView)
objNewView.Save
objNewView.Apply
End Sub
Confira também
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.