Note: The other languages of the website are Google-translated. Back to English

Como atrasar o envio do convite de reunião no Outlook? 

Normalmente, você pode aplicar o recurso Atrasar entrega para enviar uma mensagem em um horário específico, em vez de agora. Mas, às vezes, você deseja atrasar o envio de um convite de reunião, como um e-mail. Como você poderia enviar um convite de reunião no horário desejado, conforme necessário no Outlook?

Atrasar um convite de reunião de envio no Outlook com código VBA


Atrasar um convite de reunião de envio no Outlook com código VBA

Pode ser, não há uma maneira direta de atrasar um convite de reunião no Outlook, mas o código VBA abaixo pode lhe fazer um favor, faça o seguinte:

1. Primeiro, você deve criar uma nova tarefa. No novo tarefa janela:

(1.) Especifique o assunto, data de início, data de término da reunião;

(2.) Defina uma data e hora para o lembrete quando deseja enviar o convite para a reunião;

(3.) Digite a mensagem da reunião conforme necessário.

doc atraso envio reunião 1

2. Depois de criar a tarefa, por favor clique Salvar fechar opção para fechar esta janela.

3. Então, mantenha pressionado o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

4. No Microsoft Visual Basic para Aplicações janela, clique duplo Esta sessão do Outlook de Projeto1 (VbaProject.OTM) painel para abrir o modo e, em seguida, copie e cole o código a seguir no módulo em branco.

Código VBA: atrasar o envio de um convite de reunião:

Private Sub Application_Reminder(ByVal Item As Object)
    Dim xTaskItem As TaskItem
    Dim xAppointmentItem As AppointmentItem
    Dim xRcpArr() As String
    If (Item.Class <> olTask) Or (LCase(Item.Subject) <> "Meeting test") Then
        Exit Sub
    End If
    Set xTaskItem = Item
    xRcpArr = VBA.Split("yy@addin99.com,sky@addin99.com,ruby@addin99.com", ",")
    Set xAppointmentItem = Outlook.Application.CreateItem(olAppointmentItem)
    With xAppointmentItem
        .MeetingStatus = olMeeting
        For i = 0 To UBound(xRcpArr)
            .Recipients.Add (xRcpArr(i))
        Next
        .Subject = xTaskItem.Subject
        .Location = "Office room 1002"
        .Start = xTaskItem.StartDate + #2:00:00 PM#
        .Body = xTaskItem.Body
        .Duration = 120
        .ReminderSet = True
        .ReminderMinutesBeforeStart = 20
        .Save
        .Send
    End With
    xTaskItem.MarkComplete
    Set xTaskItem = Nothing
End Sub

doc atraso envio reunião 2

Nota: No código acima: Teste de reunião é o assunto que você criou para a reunião na etapa 1; e, você deve alterar as informações de endereços de destinatários, local da reunião, Hora de início e duração da reunião para o seu próprio.

5. Salve e feche o código e reinicie o Outlook para que o código tenha efeito.

6. A partir de agora, quando o lembrete do item de tarefa aparecer no horário específico definido, o Outlook enviará o convite da reunião automaticamente.


Kutools for Outlook - traz 100 recursos avançados para o Outlook e torna o trabalho muito mais fácil!

  • Auto CC / BCC por regras ao enviar e-mail; Avanço automático Vários emails por encomenda; Resposta automatica sem servidor Exchange e mais recursos automáticos ...
  • Aviso BCC - mostrar mensagem quando você tentar responder a todos se o seu endereço de e-mail estiver na lista BCC; Lembrar quando houver anexos ausentes, e mais recursos de lembrete ...
  • Responder (todos) com todos os anexos na conversa de correio; Responder muitos e-mails em segundos; Adicionar saudação automaticamente quando responder; Adicionar data ao assunto ...
  • Ferramentas de anexo: gerenciar todos os anexos em todos os e-mails, Desanexação Automática, Comprimir tudo, Renomear tudo, Salvar tudo ... Relatório rápido, Contar e-mails selecionados...
  • Lixo eletrônico poderoso por costume; Remover e-mails e contatos duplicados... Permite que você faça de maneira mais inteligente, rápida e melhor no Outlook.
tiro kutools aba kutools do outlook 1180x121
tiro kutools outlook kutools mais guia 1180x121
 
Comentários (0)
Ainda não há classificações. Seja o primeiro a avaliar!
Não há comentários postados aqui ainda
Deixe o seu comentário
Postando como convidado
×
Avalie esta postagem:
0   Personagens
Locais sugeridos

Siga-nos

Copyright © 2009 - www.extendoffice.com. | Todos os direitos reservados. Distribuído por ExtendOffice. | | | Mapa do site
Microsoft e o logotipo do Office são marcas comerciais ou marcas registradas da Microsoft Corporation nos Estados Unidos e / ou em outros países.
Protegido por Sectigo SSL