Como definir a data de início padrão como hoje ao criar uma nova tarefa no Outlook?
Quando criamos uma nova tarefa no Outlook, a tarefa com “Data de início”É exibido com "Nenhum”Por padrão, conforme a imagem a seguir mostrada. Mas, às vezes, você precisa definir hoje como sua data de início com frequência, então, você deve selecionar a data no campo “Data de início” manualmente a cada vez. Existe alguma maneira rápida de definir a data de início padrão como hoje automaticamente ao criar uma nova tarefa no Outlook?
Defina a data de início padrão como hoje ao criar uma nova tarefa com o código VBA no Outlook
Defina a data de início padrão como hoje ao criar uma nova tarefa com o código VBA no Outlook
Pode ser que não haja outra boa maneira de lidar com essa tarefa diretamente no Outlook, aqui, vou apresentar um código VBA para resolvê-lo. Siga os seguintes passos:
1. Inicie o Outlook e mantenha pressionado o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.
2. No Microsoft Visual Basic para Aplicações janela, clique duplo Esta sessão do Outlook do 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: defina a data de início padrão como hoje:
Public WithEvents xInspectors As Outlook.Inspectors
Public WithEvents xTaskItem As Outlook.TaskItem
Private Sub Application_Startup()
Set xInspectors = Outlook.Inspectors
End Sub
Private Sub xInspectors_NewInspector(ByVal Inspector As Inspector)
If Not (TypeOf Inspector.CurrentItem Is TaskItem) Then Exit Sub
Set xTaskItem = Inspector.CurrentItem
End Sub
Private Sub xTaskItem_Open(Cancel As Boolean)
If (Len(xTaskItem.Subject) = 0 And Len(xTaskItem.Body) = 0) And (xTaskItem.StartDate = #1/1/4501# And xTaskItem.DueDate = #1/1/4501#) Then
xTaskItem.StartDate = Now
End If
End Sub
3. Após inserir o código, coloque o cursor na segunda seção do código e pressione F5 chave para executar este código, veja a captura de tela:
4. Desde então, quando você cria uma nova tarefa a cada vez, o Outlook define automaticamente a data de início e a data de término para a data atual por padrão, conforme mostrado a seguir:
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.