Gibt es einen Trick zum Bearbeiten der Registrierung oder ein Makro, mit dem ich die Standardzeiten meiner Besprechungen 5 Minuten nach der vollen Stunde beginnen und 5 Minuten vor der vollen Stunde enden lassen kann? Ich mache das derzeit manuell, um das Problem zu vermeiden, dass jemand zu spät zum Meeting kommt – ich beginne pünktlich „5 Minuten nach“ … das funktioniert gut, aber es ist ein Albtraum, sich durchzuklicken, wenn man ein Meeting plant.
Antwort1
Ich habe schließlich nach einer Lösung gegoogelt – aber bei einer einfachen Suche wird sie nicht angezeigt. Es scheint, als ob nicht viele Leute daran interessiert sind.
Ich schreibe von einem PC aus, auf dem ich Outlook nicht installiert habe, aber ich hoffe, dass ich mich gut daran erinnere.
Sie müssen das Entwicklermenüband in Outlook aktivieren.
Sie müssen ein neues Formular erstellen (auf der Grundlage des Terminformulars).
In diesem neuen Formular müssen Sie einen VBA-Code für die Aktion „Öffnen“ eingeben.
in diesem Code müssen Sie „Element.Start“ und „Element.End“ ändern (nur wenn es auf eine volle oder halbe Stunde eingestellt ist. Wenn Sie diesen Teil verpassen, wird Ihr Termin bei jedem Öffnen „verkürzt“. „Start“ sollte +5 Minuten betragen, „Ende“ sollte -10 Minuten betragen (da die +5 für „Start“ tatsächlich auch „Ende“ um 5 Minuten nach vorne verschiebt).
Während Sie das neue Formular bearbeiten, möchten Sie möglicherweise eine Standardfußzeile in die Einladung einfügen (z. B. Ihre Konferenzrufnummer).
Dieses Formular speichern („Formular veröffentlichen als ...“, wenn ich mich recht erinnere)
Klicken Sie in der Kalenderansicht mit der rechten Maustaste auf Ihren Kalender-„Ordner“ und ändern Sie das zu verwendende Standardformular von „Termin“ in das Formular, das Sie unter Punkt 6 gespeichert haben.
Ich hoffe, Sie können dies mit ein wenig Hilfe von Google nachvollziehen. Die Lösung besteht darin,
- Neues Formular erstellen
- fügen Sie am Anfang ein kleines VBA hinzu
- Wählen Sie dieses Formular als Ihr neues Standard-„Kalenderformular“ aus.
Antwort2
Es scheint, dass Outlook in späteren Versionen über diese Funktion verfügt:https://chrismenardtraining.com/post/outlook-buffer-time
Antwort3
Befolgen Sie diese Richtlinie:
https://www.datanumen.com/blogs/2-methods-change-default-duration-appointment-meeting-outlook/
und verwenden Sie stattdessen das folgende Makro:
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