Partilhar via

Método BusinessCardView.Apply (Outlook)

  • Artigo

Aplica o objeto BusinessCardView ao modo de exibição atual.

Sintaxe

expressão. Aplicar

Expressão Uma expressão que retorna um objeto BusinessCardView .

Exemplo

O seguinte exemplo Visual Basic for Applications (VBA) cria, salva e aplica um novo objeto BusinessCardView.

Sub CreateBusinessCardView() 
 
 
 
 Dim objName As NameSpace 
 
 Dim objViews As Views 
 
 Dim objView As BusinessCardView 
 
 
 
 ' Get the Views collection of the Contacts default folder. 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderContacts).Views 
 
 
 
 ' Create the new view. 
 
 Set objView = objViews.Add( _ 
 
 "Card View", _ 
 
 olBusinessCardView, _ 
 
 olViewSaveOptionAllFoldersOfType) 
 
 
 
 ' Save and apply the new view. 
 
 objView.Save 
 
 objView.Apply 
 
 
 
End Sub

Confira também

Objeto BusinessCardView

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.