Propriété CalendarView.DayWeekTimeScale (Outlook)
Renvoie ou définit une constante OlDayWeekTimeScale qui représente l’échelle utilisée pour représenter des périodes dans un objet CalendarView . Lecture-écriture.
Syntaxe
expression. DayWeekTimeScale
Expression Variable qui représente un objet CalendarView .
Exemple
L'exemple Visual Basic for Applications (VBA) suivant crée un nouvel objet CalendarView dans le dossier Calendrier par défaut, puis le configure afin d'afficher 14 jours consécutifs en mode Plusieurs jours, avec les éléments Outlook affichés dans une échelle de temps horaire.
Sub CreateTwoWeekView()
Dim objNamespace As NameSpace
Dim objFolder As Folder
Dim objView As CalendarView
' Obtain Folder object reference to the Calendar default folder.
Set objNamespace = Application.GetNamespace("MAPI")
Set objFolder = objNamespace.GetDefaultFolder(olFolderCalendar)
' Create a new CalendarView object named "Two Weeks".
Set objView = objFolder.Views.Add("Two Weeks", _
olCalendarView, _
olViewSaveOptionAllFoldersOfType)
' Configure the new CalendarView object.
With objView
' Display the view in multi-day mode.
.CalendarViewMode = olCalendarViewMultiDay
' Display 14 consecutive days in multi-day
' mode.
.DaysInMultiDayMode = 14
' Set the time scale for the view in one-hour
' intervals.
.DayWeekTimeScale = olTimeScale60Minutes
' Save and apply the new CalendarView object.
.Save
.Apply
End With
End Sub
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.