Método AppointmentItem.Respond (Outlook)

Responde a uma solicitação de reunião.

Sintaxe

expression. Respond( _Response_ , _fNoUI_ , _fAdditionalTextDialog_ )

Expressão Uma variável que representa um objeto 'AppointmentItem'.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Response	Obrigatório	OlMeetingResponse	A resposta à solicitação.
fNoUI	Opcional	Variant	True para não exibir uma caixa de diálogo; a resposta é enviada automaticamente. False para exibir a caixa de diálogo para responder.
fAdditionalTextDialog	Opcional	Variant	False para não solicitar ao usuário de entrada; a resposta é exibida no Inspetor para edição. True para solicitar ao usuário enviar ou enviar com comentários. Este argumento é válido somente se fNoUI for False.

Valor de retorno

Um objeto MeetingItem que representa a resposta à solicitação de reunião.

Comentários

Quando você chama o método Respond com o parâmetro olMeetingAccepted ou olMeetingTentative, o Outlook criará um novo item de compromisso que duplica o item de compromisso original. O novo item terá um ID de entrada diferente. Outlook então removerá o item original. Você deve não mais usar a identificação de entrada do item original, mas em vez disso, chame a propriedade EntryID para obter a identificação de entrada para o novo item para quaisquer necessidades subsequentes. Isso é para garantir que esse item de compromisso será adequadamente sincronizado no seu calendário se mais de um computador cliente acessa seu calendário, mas pode estar offline usando ao modo cache ocasionalmente.

A tabela a seguir descreve o comportamento do método responder dependendo do objeto pai e os parâmetros fNoUI e fAdditionalTextDialog.

fNoUI, fAdditionalTextDialog	Resultado
True, True	Item de resposta é retornada com nenhuma interface de usuário. Para enviar a resposta, você deve chamar o método Send.
True, False	O mesmo resultado que com True, True.
False, True	Pede para o usuário Enviar ou Editar antes de enviar a resposta.
False, False	Um novo item de resposta aparece na interface do usuário, mas nenhum aviso é exibido.

Exemplo

Este exemplo Visual Basic for Applications (VBA) localiza MeetingItem na pasta de caixa de entrada padrão e adiciona o compromisso associado à pasta calendário. Em seguida, ele responde ao remetente aceitando a reunião.

Sub AcceptMeeting() 
 Dim myNameSpace As Outlook.NameSpace 
 Dim myFolder As Outlook.Folder 
 Dim myMtgReq As Outlook.MeetingItem 
 Dim myAppt As Outlook.AppointmentItem 
 Dim myMtg As Outlook.MeetingItem 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 Set myFolder = myNameSpace.GetDefaultFolder(olFolderInbox) 
 Set myMtgReq = myFolder.Items.Find("[MessageClass] = 'IPM.Schedule.Meeting.Request'") 
 If TypeName(myMtgReq) <> "Nothing" Then 
 Set myAppt = myMtgReq.GetAssociatedAppointment(True) 
 Set myMtg = myAppt.Respond(olResponseAccepted, True) 
 myMtg.Send 
 End If 
End Sub

Confira também

Objeto AppointmentItem

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.