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.
Você precisa habilitar a "faixa de opções" do desenvolvedor no Outlook
Você precisa criar um novo formulário (usando o Formulário de Agendamento como base)
Neste novo formulário - você precisa colocar um código VBA para a ação Open
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).
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).
Salve este formulário ("Publicar formulário como..." se bem me lembro)
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 é
- criar novo formulário
- adicione um pequeno VBA no início
- 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