Objeto Views (Outlook)
Colección de todos los objetos View de la carpeta actual.
Utilice la propiedad Views del objeto Folder para devolver la colección Views. Use Views (index), donde index es el nombre o la posición del objeto dentro de la colección, para devolver un único objeto View .
Use el método Add de la colección Views para agregar una nueva vista a la colección.
Utilice el método Remove para quitar una vista de la colección.
En el ejemplo siguiente se devuelve un objeto View de tipo olTableView denominado Table View. Antes de ejecutar este ejemplo, asegúrese de que una vista con el nombre "Table View" existe.
Sub GetView()
'Returns a view called Table View
Dim objName As NameSpace
Dim objViews As Views
Dim objView As View
Set objName = Application.GetNamespace("MAPI")
Set objViews = objName.GetDefaultFolder(olFolderInbox).Views
'Return a view called Table View
Set objView = objViews.Item("Table View")
End Sub
En el ejemplo siguiente se agrega una nueva vista de tipo olIconView en la carpeta Notes del usuario.
Nota
[!NOTA] El método Add se producirá un error si ya existe una vista con el mismo nombre.
Sub CreateView()
'Creates a new view
Dim objName As NameSpace
Dim objViews As Views
Dim objNewView As View
Set objName = Application.GetNamespace("MAPI")
Set objViews = objName.GetDefaultFolder(olFolderNotes).Views
Set objNewView = objViews.Add(Name:="New Icon View Type", _
ViewType:=olIconView, SaveOption:=olViewSaveOptionThisFolderEveryone)
End Sub
En el siguiente ejemplo, se quite la vista anterior, "New Icon View Type", de la colección.
Sub DeleteView()
'Deletes a view from the collection
Dim objName As NameSpace
Dim objViews As Views
Dim objNewView As View
Set objName = Application.GetNamespace("MAPI")
Set objViews = objName.GetDefaultFolder(olFolderNotes).Views
objViews.Remove ("New Icon View Type")
End Sub
Nombre |
---|
ViewAdd |
ViewRemove |
Nombre |
---|
Aplicación |
Class |
Count |
Parent |
Session |
Referencia del modelo de objetos de Outlook
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.