Ir para o conteúdo principal

Como inserir um seletor de data em emails no Outlook?

Suponha que você precise enviar um cronograma de trabalho para seus colegas, atribuindo tarefas diferentes a pessoas diferentes em datas diferentes. No entanto, você está preocupado em cometer erros ao inserir a data manualmente, então você precisa de um seletor de data. Este tutorial fornece um método para ajudá-lo a inserir um seletor de data em emails no Outlook.


Inserir um seletor de data em emails no Outlook com código VBA

Você pode executar o seguinte código VBA para inserir um seletor de data em emails do Outlook. Por favor siga as instruções abaixo.

1. Inicie o Outlook, pressione o outro + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2. No painel esquerdo, clique duas vezes Project1 > Objetos do Microsoft Outlook > Esta sessão do Outlook, e, em seguida, copie o seguinte código VBA para o ThisOutlookSession (Código) janela.

Código VBA: Inserir seletor de data em emails do Outlook

Sub DatePicker()
'Updated by Extendoffice 20220615
  Dim xDoc As Document
  On Error Resume Next
  Set xDoc = Application.ActiveInspector.WordEditor
  With xDoc.Application.Selection
    .Range.ContentControls.Add (wdContentControlDate)
    .ParentContentControl.DateDisplayFormat = "MMMM d, yyyy"
    .InsertAfter Format(Now(), "MMMM d, yyyy")
    .MoveRight wdCharacter, 1
  End With
End Sub

Nota: No código, você pode alterar “MMMM d, aaaa” para o formato de data que você precisa.

3. Fique no Microsoft Visual Basic para Aplicações janela, clique em Ferramentas > Referências.

4. No Referências - Projeto1 caixa de diálogo, verifique a Biblioteca de objetos do Microsoft Word 16.0 caixa de seleção e clique em OK para salvar as mudanças.

5. aperte o outro + Q chaves para fechar o Microsoft Visual Basic para Aplicações janela.

6. No Mail visualizar, clique no Novo Email botão sob o Home page guia para criar um novo e-mail.

7. No Mensagem janela, clique no Personalize a barra de ferramentas de acesso rápido botão E, em seguida, selecione Mais comandos no menu suspenso. Veja a imagem:

8. No Opções do Outlook janela, você precisa configurar da seguinte forma.

8.1) Escolha Macros no Escolha o comando de lista suspensa;
8.2) Selecione o script que você criou acima na caixa de comandos à esquerda;
8.3) Clique no Adicionar botão.
8.4) Mantenha o script selecionado na caixa à direita e clique no botão modificar botão. No Botão Modificar caixa de diálogo, atribua um novo botão ao script e clique em OK.
8.5) Clique OK no Opções do Outlook janela para salvar as alterações.

O script VBA agora é adicionado ao Barra de Ferramentas de Acesso Rápido e exibido como o ícone que você especificou.

A partir de agora, ao redigir um e-mail, você pode clicar no ícone do seletor de datas na Barra de Ferramentas de Acesso Rápido para inserir um seletor de datas no corpo do e-mail e, em seguida, selecione a data desejada. Veja a demonstração a seguir.

Observações:

1) Você pode inserir vários seletores de data no corpo de um e-mail.
2) Você pode alterar a data selecionada: clique no campo de data para exibir o controle Data e selecione uma nova data conforme necessário.
3) Este selecionador de datas também pode ser inserido no corpo de um compromisso ou tarefa. Se precisar, crie um novo compromisso ou tarefa e repita as etapas 7-8 acima para alcançá-lo.

Melhores ferramentas de produtividade de escritório

Kutools for Outlook - Mais de 100 recursos poderosos para turbinar seu Outlook

🤖 Assistente de correio AI: E-mails profissionais instantâneos com magia de IA – um clique para respostas geniais, tom perfeito, domínio multilíngue. Transforme o envio de e-mails sem esforço! ...

📧 Automação de e-mail: Fora do escritório (disponível para POP e IMAP)  /  Agendar envio de e-mails  /  CC/BCC automático por regras ao enviar e-mail  /  Encaminhamento automático (regras avançadas)   /  Adicionar saudação automaticamente   /  Divida automaticamente e-mails de vários destinatários em mensagens individuais ...

📨 Gestão de E-mail: Lembre-se facilmente de e-mails  /  Bloquear e-mails fraudulentos por assuntos e outros  /  Apagar Emails Duplicados  /  Pesquisa Avançada  /  Consolidar pastas ...

📁 Anexos PróSalvar em lote  /  Desanexar lote  /  Comprimir em Lote  /  Salvamento automático   /  Desanexação Automática  /  Compressão automática ...

???? Interface Mágica: 😊Mais emojis bonitos e legais   /  Aumente a produtividade do seu Outlook com visualizações com guias  /  Minimize o Outlook em vez de fechar ...

???? Maravilhas com um clique: Responder a todos com anexos recebidos  /   E-mails antiphishing  /  🕘Mostrar fuso horário do remetente ...

👩🏼‍🤝‍👩🏻 Contatos e calendário: Adicionar contatos em lote de e-mails selecionados  /  Dividir um grupo de contatos em grupos individuais  /  Remover lembretes de aniversário ...

Sobre Características 100 Aguarde sua exploração! Clique aqui para descobrir mais.

 

 

Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hello. Very clear instructions, thank you.
When I attempt to use the macro, I get this error:
"Compile error: User defined type not defined."
Sub DatePicker() and xDoc As Document are highlighted.
Any ideas on how to fix it please?
This comment was minimized by the moderator on the site
Hi Dave,

To solve this problem, please follow the instruction of step 3 and 4 to enable the Microsoft Word 16.0 Object Library option in the Microsoft Visual Basic for Applications window.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/outlook-word-referece-vba.png?1711618070
This comment was minimized by the moderator on the site
This was exactly what I was looking for. Thank you!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations