Compartir a través de


Propiedad TimelineView.MaxLabelWidth (Outlook)

Devuelve o establece un valor de tipo Long que representa la longitud máxima (en caracteres) para la etiqueta de un elemento de Outlook en el objeto TimelineView. Lectura y escritura.

Sintaxis

expresión. MaxLabelWidth

Expresión Variable que representa un objeto TimelineView .

Comentarios

Esta propiedad puede establecerse en un valor entre 0 y 132. Si se establece en un valor menor que 0, su valor cambiará a 0. Si se establece en un valor mayor que 132, su valor cambiará a 132. El valor predeterminado de esta propiedad es 80.

Si esta propiedad se establece en 0, las etiquetas para los elementos de Outlook no se muestran en la vista.

Ejemplo:

El siguiente de Visual Basic para Aplicaciones (VBA) se configura el objeto TimelineView actual para mostrar elementos de Outlook por meses, con etiquetas de número de semana en la parte inferior de la escala de tiempo, con etiquetas de no más de 40 caracteres.

Private Sub ConfigureMonthTimelineView() 
 
 Dim objTimelineView As TimelineView 
 
 
 
 If Application.ActiveExplorer.CurrentView.ViewType = _ 
 
 olTimelineView Then 
 
 
 
 ' Obtain a TimelineView object reference for the 
 
 ' current timeline view. 
 
 Set objTimelineView = _ 
 
 Application.ActiveExplorer.CurrentView 
 
 
 
 ' Configure the TimelineView object so that it displays 
 
 ' Outlook items by month and week, displaying labels 
 
 ' no larger than 40 characters for Outlook items 
 
 ' displayed in the view. 
 
 With objTimelineView 
 
 ' Display items by month. 
 
 .TimelineViewMode = olTimelineViewMonth 
 
 ' Display week numbers. If this value is 
 
 ' set to False when TimelineViewMode is 
 
 ' set to olTimelineViewMonth, the day 
 
 ' numbers are displayed instead. 
 
 .ShowWeekNumbers = True 
 
 ' Display labels for Outlook items 
 
 ' while TimelineViewMode is set to 
 
 ' olTimelineViewMonth. 
 
 .ShowLabelWhenViewingByMonth = True 
 
 ' Show no more than the first 40 characters 
 
 ' for each Outlook item in the view. 
 
 .MaxLabelWidth = 40 
 
 
 
 ' Save and apply the view. 
 
 .Save 
 
 .Apply 
 
 End With 
 
 End If 
 
 
 
End Sub

Consulte también

Objeto TimelineView

Soporte técnico y comentarios

¿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.