Método BusinessCardView.Copy (Outlook)

Cria um novo objeto View com base em um objeto BusinessCardView existente.

Sintaxe

expressão. Copiar (Nome, SaveOption)

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Name	Obrigatório	String	O nome do novo modo de exibição.
SaveOption	Opcional	OlViewSaveOption	A opção de gravação para o novo modo de exibição.

Valor de retorno

Um objeto View que representa o novo modo de exibição.

Exemplo

O seguinte exemplo Visual Basic for Applications (VBA) cria uma cópia de um objeto BusinessCardView, chamado "Novo Card View" e salva na pasta padrão Contatos. Para executar esse exemplo, você precisará criar primeiro um objeto BusinessCardView chamado "Card View" programaticamente ou por meio da interface de usuário Microsoft Outlook.

Sub CopyBusinessCardView() 
 
 
 
 Dim objName As NameSpace 
 
 Dim objViews As Views 
 
 Dim objNewView As BusinessCardView 
 
 
 
 ' Get the Views collection of the Contacts default folder. 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderContacts).Views 
 
 
 
 ' Copy the existing view. 
 
 Set objNewView = objViews("Card View").Copy( _ 
 
 "New Card View", _ 
 
 olViewSaveOptionThisFolderEveryone) 
 
 
 
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.