Método AppointmentItem.Send (Outlook)
Envia o compromisso.
Sintaxe
expression. Send
Expressão Uma variável que representa um objeto AppointmentItem .
Comentários
O método Send envia um item usando a conta padrão especificada para a sessão. Em uma sessão onde várias contas do Microsoft Exchange são definidas no perfil, a primeira conta Exchange adicionada ao perfil do é a conta principal do Exchange e também é a conta padrão para a sessão. Para especificar uma conta diferente para enviar um item, definir a propriedade SendUsingAccount para o objeto de conta desejado e, em seguida, chame o método de Send.
Exemplo
Este exemplo Visual Basic for Applications (VBA) usa CreateItem para criar um compromisso. O exemplo define a propriedade MeetingStatus como olMeeting para indicar o compromisso como uma solicitação de reunião e define um participante necessário, um participante opcional e um local de reunião como um recurso. O exemplo, em seguida, exibe e envia o item de compromisso.
Sub CreateAppt()
Dim myItem As Object
Dim myRequiredAttendee, myOptionalAttendee, myResourceAttendee As Outlook.Recipient
Set myItem = Application.CreateItem(olAppointmentItem)
myItem.MeetingStatus = olMeeting
myItem.Subject = "Strategy Meeting"
myItem.Location = "Conf Rm All Stars"
myItem.Start = #9/24/2009 1:30:00 PM#
myItem.Duration = 90
Set myRequiredAttendee = myItem.Recipients.Add("Nate Sun")
myRequiredAttendee.Type = olRequired
Set myOptionalAttendee = myItem.Recipients.Add("Kevin Kennedy")
myOptionalAttendee.Type = olOptional
Set myResourceAttendee = myItem.Recipients.Add("Conf Rm All Stars")
myResourceAttendee.Type = olResource
myItem.Display
myItem.Send
End Sub
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.