_Views.Add(String, OlViewType, OlViewSaveOption) Método

Definição

Namespace:

Microsoft.Office.Interop.Outlook

Assembly:

Microsoft.Office.Interop.Outlook.dll

Cria uma nova exibição na Views coleção.

public Microsoft.Office.Interop.Outlook.View Add (string Name, Microsoft.Office.Interop.Outlook.OlViewType ViewType, Microsoft.Office.Interop.Outlook.OlViewSaveOption SaveOption);

Public Function Add (Name As String, ViewType As OlViewType, Optional SaveOption As OlViewSaveOption) As View

Parâmetros

Name

String

O nome do novo modo de exibição.

ViewType

OlViewType

O tipo do novo modo de exibição.

SaveOption

OlViewSaveOption

A opção de salvamento que especifica as permissões do novo modo de exibição. olViewSaveOptionAllFoldersOfType O modo de exibição pode ser acessado em todas as pastas desse tipo. olViewSaveOptionThisFolderEveryOne A exibição só pode ser acessada por todos os usuários nesta pasta. olViewSaveOptionThisFolderOnlyMe A exibição só pode ser acessada nesta pasta pelo usuário.

Retornos

View

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

Comentários

Se você adicionar um modo de exibição a uma coleção de modos de exibição de uma pasta que não seja a pasta atual, você deve primeiro salvar uma cópia do objeto da coleção de modos de exibição e, em seguida, adicione o modo de exibição para este objeto de coleção, conforme mostrado no exemplo de código abaixo. Essa é uma solução para um problema existente que, de outra forma, fará com que uma chamada Apply() para o Modo de Exibição adicionado falhe.

Sub CalendarView()
    Dim calView As Outlook.View
    Dim vws As Outlook.Views

    Application.ActiveExplorer.CurrentFolder = _
        Application.Session.GetDefaultFolder( _
        Outlook.OlDefaultFolders.olFolderInbox)

    ' Current folder is Inbox; add a View to the Calendar folder which 
    ' is not the current folder. Keep a copy of the object for the 
    ' Views collection for the Calendar
    vws = Application.Session.GetDefaultFolder( _
        Outlook.OlDefaultFolders.olFolderCalendar).Views

    ' Add the View to this Views collection object
    calView = vws.Add("New Calendar", _
        Outlook.OlViewType.olCalendarView, _
        Outlook.OlViewSaveOption.olViewSaveOptionThisFolderEveryone)
    calView.Save()
    ' This Apply call will be fine.
    calView.Apply()
End Sub

private void CalendarView()
{
    Outlook.View calView;
    Outlook.Views vws;

    Application.ActiveExplorer().CurrentFolder = 
        Application.Session.GetDefaultFolder( 
        Outlook.OlDefaultFolders.olFolderInbox);

    // Current folder is Inbox; add a View to the Calendar folder which 
    //is not the current folder. Keep a copy of the object for the 
    //Views collection for the Calendar
    vws = Application.Session.GetDefaultFolder( 
        Outlook.OlDefaultFolders.olFolderCalendar).Views;

    //Add the View to this Views collection object
    calView = vws.Add("New Calendar",
        Outlook.OlViewType.olCalendarView, 
        Outlook.OlViewSaveOption.olViewSaveOptionThisFolderEveryone);
    calView.Save();
    // This Apply call will be fine.
    calView.Apply();
}