Méthode Inspector.SetSchedulingStartTime (Outlook)
Définit l’heure de début d’un élément de réunion dans la grille de disponibilité sous l’onglet Assistant Planification de l’inspecteur.
Syntaxe
expression. SetSchedulingStartTime
( _Start_
)
Expression Variable qui représente un objet « Inspector ».
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Start | Requis | Date | Début de la plage horaire dont l’onglet Assistant Planification de l’inspecteur affiche la disponibilité pour les informations des participants. |
Remarques
L’objet spécifié par la propriété CurrentItem de l’objet Inspector parent doit être un Objet AppointmentItem ou MeetingItem. L’onglet Assistant Planification doit s’afficher dans l’inspecteur, sinon Microsoft Outlook génère une erreur. Si Outlook ne peut pas afficher l’onglet Assistant Planification pour ce type d’élément, Outlook affiche l’erreur suivante : L’heure de début de la planification ne peut être définie que lorsque l’Assistant Planification est affiché sur un élément de réunion.
Exemple
L’exemple de code suivant écrit en VBA (Microsoft Visual Basic pour Applications) montre comment utiliser la méthode SetSchedulingStartTime pour définir l’heure de début planifiée sous l’onglet Assistant Planification d’un AppointmentItem. La date de début du rendez-vous est défini pour dans un mois à compter de maintenant, et de même pour l’heure de début planifiée.
Sub DemoSetSchedulingStartTime()
Dim oAppt As Outlook.AppointmentItem
Dim oInsp As Outlook.inspector
' Create and display appointment.
Set oAppt = Application.CreateItem(olAppointmentItem)
oAppt.MeetingStatus = olMeeting
oAppt.Subject = "Test Appointment"
oAppt.Start = DateAdd("m", 1, Now)
' Display the appointment in the Appointment tab of the inspector.
oAppt.Display
Set oInsp = oAppt.GetInspector
' Switch to the Scheduling Assistant tab in that inspector.
oInsp.SetCurrentFormPage ("Scheduling Assistant")
' Set the appointment start time in the Scheduling Assistant.
oInsp.SetSchedulingStartTime (DateAdd("m", 1, Now))
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.