Il n'y a pas d'API pour cela. Vous pouvez utiliser l'API d'accessibilité, ou vous pouvez utiliser Redemption et son objet SafeInspector (qui enveloppe quelques-unes des fonctionnalités de l'API d'accessibilité)
set sInspector = CreateObject("Redemption.SafeInspector")
sInspector.Item = Application.ActiveInspector
'make sure "Scheduling Assistant" is shown
set Ribbon = sInspector.Ribbon
oldActiveTab = Ribbon.ActiveTab
Ribbon.ActiveTab = "Meeting"
set Control = Ribbon.Controls("Scheduling Assistant")
Control.Execute
'MsgBox "wait" - you might need to wait for the tab to switch
'simulate a click on the "Add Attendee" button
sInspector.InvokeControl(&H00001112) ' &H00001112 is AppointmentAddAttendeeButton
Voulez-vous dire que vous voulez passer à l'onglet « Assistant Planification »? –
Je souhaite cliquer par programme sur l'option "inviter des participants" après avoir ajouté un destinataire dans la liste "À", juste pour informer l'utilisateur qu'un destinataire a été ajouté – Ajinkya