existe uma maneira de automatizar xx:05 como início da reunião e xx:55 como final da reunião por padrão no Outlook

existe uma maneira de automatizar xx:05 como início da reunião e xx:55 como final da reunião por padrão no Outlook

Existe um truque de edição de registro ou uma macro que posso usar para que os horários padrão de minhas reuniões comecem 5 minutos após a hora completa e terminem 5 minutos antes da hora completa. Faço isso manualmente agora para eliminar o problema de alguém estar atrasado para a reunião - começo em ponto "5 minutos depois" ... isso funciona bem, mas é um pesadelo para clicar ao agendar uma reunião.

Responder1

Finalmente pesquisei a solução no Google - no entanto, não é algo que fica visível com uma simples pesquisa. Parece que não há muitas pessoas interessadas.

Estou escrevendo de um PC onde não tenho o Outlook instalado, mas espero me lembrar bem disso.

  1. Você precisa habilitar a "faixa de opções" do desenvolvedor no Outlook

  2. Você precisa criar um novo formulário (usando o Formulário de Agendamento como base)

  3. Neste novo formulário - você precisa colocar um código VBA para a ação Open

  4. neste código - você precisa modificar Item. Início e Item. Fim (somente se estiver definido para hora inteira ou meia hora, se você perder esta peça seu compromisso irá "encolher" cada vez que você abri-lo. O início deve ser +5 minutos, o final deve ser -10 minutos (como o +5 para start na verdade também empurra End 5 minutos para frente).

  5. Enquanto você está editando o novo formulário, você pode querer adicionar algum rodapé padrão no convite (por exemplo, seu número de teleconferência).

  6. Salve este formulário ("Publicar formulário como..." se bem me lembro)

  7. Clique com o botão direito na visualização do calendário na "pasta" do Calendário e altere o formulário padrão a ser usado de Compromisso para aquele que você salvou no ponto 6.

Espero que você consiga acompanhar isso com uma pequena ajuda do Google. A solução é

  1. criar novo formulário
  2. adicione um pequeno VBA no início
  3. selecione este formulário como seu novo "formulário de calendário" padrão.

Responder2

Parece que o Outlook possui esse recurso em versões posteriores:https://chrismenardtraining.com/post/outlook-buffer-time

Responder3

Siga esta diretriz:

https://www.datanumen.com/blogs/2-methods-change-default-duration-appointment-meeting-outlook/

e use a seguinte macro:

Private WithEvents objInspectors As Outlook.Inspectors
Private WithEvents objAppointment As Outlook.AppointmentItem

Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is AppointmentItem Then
       Set objAppointment = Inspector.CurrentItem
    End If
End Sub

Private Sub objAppointment_Open(Cancel As Boolean)
    'Set the default duration of new appointment
    If objAppointment.CreationTime = #1/1/4501# Then
       objAppointment.Duration = "50"
       objAppointment.Start = DateAdd("n", 5, objAppointment.Start)
    End If
End Sub

Private Sub objAppointment_PropertyChange(ByVal Name As String)
    'When you disable the "All Day Event"
    'Change the default duration of the current appointment
    If Name = "AllDayEvent" Then
       If objAppointment.AllDayEvent = False Then
          objAppointment.Duration = "50"
          objAppointment.Start = DateAdd("n", 5, objAppointment.Start)
       End If
    End If
End Sub

informação relacionada