Skip to main content

Explore a nova versão gratuita do Kutools para Outlook hoje!

Como alterar o padrão de evento de dia inteiro para ocupado no Outlook?

Author: Siluvia Last Modified: 2025-06-04

Por padrão, o Outlook define o status de compromissos e reuniões como "Ocupado", mas eventos de dia inteiro como "Livre" (veja a captura de tela abaixo). Você precisa alterar manualmente o status Mostrar Como para Ocupado cada vez que cria um evento de dia inteiro. Para alterar o status padrão Mostrar Como dos eventos de dia inteiro para Ocupado, este artigo fornece dois métodos.

changing the all-day event default to busy in Outlook

Alterar o padrão de evento de dia inteiro para ocupado criando um formulário personalizado

Um formulário personalizado pode ajudá-lo a criar um evento de dia inteiro com o status padrão "Mostrar Como" definido como "Ocupado". Por favor, siga os passos abaixo.

1. Alterne para a visualização do Calendário. Clique em "Início" > "Novo Compromisso".

2. Na nova janela de Compromisso, clique em "Desenvolvedor" > "Projetar Este Formulário".

Dicas: Se a guia "Desenvolvedor" não aparecer na faixa de opções, por favor, siga os métodos neste artigo para exibi-la.

steps on changing the all-day event default to busy by creating a custom form

3. Em seguida, a janela de compromisso entra no modo de design. Você precisa clicar na aba "(P.2)".

steps on changing the all-day event default to busy by creating a custom form

4. Arraste o campo "Evento de Dia Inteiro" e o campo "Mostrar Hora Como" separadamente do painel "Seletor de Campos" para a área sob a aba "(P.2)".

steps on changing the all-day event default to busy by creating a custom form

5. Clique com o botão direito no campo "Evento de Dia Inteiro" arrastado e selecione "Propriedades" no menu de contexto.

steps on changing the all-day event default to busy by creating a custom form

6. Na caixa de diálogo "Propriedades", você precisa configurar conforme segue.

6.1) Vá para a aba "Valor";
6.2) Na seção "Valor Inicial", marque a caixa "Definir o valor inicial deste campo para";
6.3) Insira o valor "True" na caixa de texto;
6.4) Clique no botão "OK". Veja a captura de tela:
steps on changing the all-day event default to busy by creating a custom form

7. Clique com o botão direito na caixa de combinação do campo "Mostrar Hora Como" e clique em "Propriedades" no menu de contexto.

steps on changing the all-day event default to busy by creating a custom form

8. Na caixa de diálogo "Propriedades", você precisa configurar conforme segue.

8.1) Vá para a aba "Valor";
8.2) Na seção "Valor Inicial", marque a caixa "Definir o valor inicial deste campo para";
8.3) Insira o número "2" na caixa de texto;
8.4) Clique no botão "OK". Veja a captura de tela:
steps on changing the all-day event default to busy by creating a custom form

9. Clique em "Publicar" > "Publicar Formulário Como" na faixa de opções.

steps on changing the all-day event default to busy by creating a custom form

10. Na caixa de diálogo "Publicar Formulário Como", você precisa:

10.1) Selecionar uma pasta de destino para o formulário personalizado na lista suspensa "Procurar Em". Aqui eu escolho o item "Biblioteca de Formulários Pessoais";
10.2) Nomeie o formulário personalizado na caixa de texto "Nome de Exibição";
10.3) Clique no botão "Publicar". Veja a captura de tela:
steps on changing the all-day event default to busy by creating a custom form

11. Feche a janela de Compromisso sem salvar.

12. A partir de agora, quando precisar criar um evento de dia inteiro com o status Mostrar Como padrão definido como Ocupado, alterne para a visualização "Calendário" e clique em "Início" > "Novos Itens" > "Formulários Personalizados" > "O nome do formulário personalizado".

steps on changing the all-day event default to busy by creating a custom form

Nota: Para criar um evento de dia inteiro com o status Mostrar Como padrão definido como “Livre”, basta fazer como de costume: clique em "Início" > "Novo Compromisso" e depois marque a caixa "Evento de Dia Inteiro" na janela "Compromisso".

Alterar o padrão de evento de dia inteiro para ocupado usando VBA

O método acima tem muitas etapas. Se você sempre precisa criar um evento de dia inteiro com o status Mostrar Como padrão definido como "Ocupado", o seguinte código VBA pode ajudá-lo a fazê-lo facilmente.

1. Abra seu Outlook, pressione as teclas "Alt" + "F11" simultaneamente para abrir a janela "Microsoft Visual Basic for Applications".

2. Na janela "Microsoft Visual Basic for Applications", clique duas vezes em "Project1" > "Objetos do Microsoft Outlook" > "ThisOutlookSession" para abrir a janela "ThisOutlookSession (Código)", e depois copie o seguinte código nesta janela de código.

steps on changing the all-day event default to busy by using VBA

Código VBA: Definir o status de evento de dia inteiro como "Ocupado" por padrão

Public WithEvents GInspectors As Inspectors
Public WithEvents GAppointmentItem As AppointmentItem

Private Sub Application_Startup()
'Updated by Extendoffice 20220413
  Set GInspectors = Application.Inspectors
End Sub

Private Sub GInspectors_NewInspector(ByVal Inspector As Inspector)
  Select Case Inspector.CurrentItem.Class
    Case olAppointment
      Set GAppointmentItem = Inspector.CurrentItem
  End Select
End Sub

Private Sub GAppointmentItem_Open(Cancel As Boolean)
  Select Case GAppointmentItem.AllDayEvent
    Case True
      GAppointmentItem.BusyStatus = olBusy
  End Select
End Sub

Private Sub GAppointmentItem_PropertyChange(ByVal Name As String)
  If Name = "AllDayEvent" Then
    Select Case GAppointmentItem.AllDayEvent
      Case True
        GAppointmentItem.BusyStatus = olBusy
    End Select
  End If
End Sub

3. Salve o código VBA e reinicie o Outlook.

A partir de agora, após converter um compromisso ou uma reunião em um evento de dia inteiro, o status "Mostrar Como" será exibido como "Ocupado" por padrão.

steps on changing the all-day event default to busy by using VBA

Artigos relacionados

Alterar o Tempo de Lembrete Padrão de Eventos de Dia Inteiro no Outlook
Normalmente, o tempo de lembrete padrão de eventos de dia inteiro é de 18 horas no Outlook 2007/2010 e 0,5 dia no Outlook 2013. Às vezes, o tempo de lembrete padrão de eventos de dia inteiro pode não concordar com sua agenda de trabalho. Aqui vamos introduzir a maneira de alterar o tempo de lembrete padrão de eventos de dia inteiro no Microsoft Outlook.

Alterar o Tempo de Acompanhamento Padrão no Outlook
Como sabemos, ao adicionar um lembrete de acompanhamento para um email no Outlook, o tempo de acompanhamento padrão é 16:30 (ou outro horário dependendo das suas horas de trabalho). No entanto, você pode querer alterar o tempo de acompanhamento padrão e deixá-lo lembrar você no início das horas de trabalho, como 9:00 AM. Neste artigo, mostrarei como alterar o tempo de acompanhamento padrão no Outlook.

Alterar Local de Arquivamento Padrão no Outlook
Por padrão, o Outlook possui um local padrão para os arquivos de arquivamento. Além do local padrão, você pode definir seu próprio local de arquivamento para seus arquivos de arquivamento. Neste tutorial, mostraremos detalhadamente como alterar o local de arquivamento padrão no Outlook.

Alterar Local de Salvamento de Anexos Padrão no Outlook
Você já se cansou de encontrar o local de anexo que especificou toda vez que inicia o Outlook? Neste tutorial, mostraremos como alterar o local de salvamento de anexos padrão. Depois disso, a pasta de salvamento de anexos especificada será aberta automaticamente toda vez que você salvar os anexos, mesmo que reinicie o Outlook.

Alterar o Tempo Padrão para Entrega Atrasada no Outlook
Este tutorial fornece um código VBA para ajudá-lo a alterar o tempo padrão para a opção de entrega atrasada no Outlook.

Melhores Ferramentas de Produtividade para Office

Notícia de Última Hora: Kutools para Outlook Lança Versão Gratuita!

Experimente agora a nova versão GRATUITA do Kutools para Outlook, com mais de70 recursos incríveis para você usar PARA SEMPRE! Clique para baixar agora!

🤖 Kutools AI : Utiliza tecnologia avançada de IA para gerenciar emails com facilidade, incluindo responder, resumir, otimizar, expandir, traduzir e redigir emails.

📧 Automação de Email: Resposta automática (Disponível para POP e IMAP) / Agendar envio de emails / CC/BCC automático por Regra ao enviar email / Encaminhamento automático (Regra avançada) / Adicionar saudação automaticamente / Dividir automaticamente emails com múltiplos destinatários em mensagens individuais...

📨 Gerenciamento de Email: Recallar Email / Bloquear emails suspeitos por assunto e outros critérios / Excluir Emails Duplicados / Pesquisa Avançada / Organizar Pastas...

📁 Anexos Pro: Salvar em lote / Desanexar em lote / Comprimir em lote / Salvar automaticamente / Desanexar automaticamente / Auto Comprimir...

🌟 Interface Mágica: 😊Mais emojis bonitos e estilosos / Aviso quando emails importantes chegarem / Minimizar Outlook ao invés de fechar...

👍 Recursos com Um Clique: Responder a Todos com Anexos / Emails Anti-Phishing / 🕘Exibir o fuso horário do remetente...

👩🏼‍🤝‍👩🏻 Contatos & Calendário: Adicionar contatos em lote a partir de emails selecionados / Dividir um grupo de contatos em grupos individuais / Remover lembrete de aniversário...

Desbloqueie instantaneamente o Kutools para Outlook com um único clique. Não perca tempo, baixe agora e aumente sua produtividade!

kutools for outlook features1 kutools for outlook features2