set specific time for incoming meeting reminder

this is the VBA script that was sent to me by Microsoft:

1. Open Outlook.
2. Press Alt + F11 to open the VBA editor.
3. In the VBA editor, go to Insert > Module to create a new module.
4. Copy and paste the following script into the module:

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    If TypeOf Item Is MeetingItem Then
        Dim objMeeting As MeetingItem
        Set objMeeting = Item
        Dim objAppt As AppointmentItem
        Set objAppt = objMeeting.GetAssociatedAppointment(True)
        If Not objAppt Is Nothing Then
            objAppt.ReminderMinutesBeforeStart = 15 ' Set reminder time in minutes
            objAppt.Save
        End If
    End If
End Sub

Save and close the VBA editor.

This script sets a reminder 15 minutes before the start of any meeting that is sent. You can adjust the ReminderMinutesBeforeStart value to whatever time you prefer.

To ensure the script runs automatically, you might need to enable macros in Outlook:

1. Go to File > Options > Trust Center > Trust Center Settings.
2. Select Macro Settings and choose Enable all macros.

but the sccript does not work - the meeting reminder time does not change. am i doing something wrong?

The transcribed macro allows the meeting organizer to set a fixed 15-minute reminder.

The module in which the macro should be written is the ThisOutlookSession module.

In addition, objAppt.ReminderSet = True must be set before setting the time.