Use one Start and End time for all Outlook Appointments

To create a custom form that has a preset start and end time, you need to open the form in design mode, add a little VBScript then publish the form. You can then either set the form as your default appointment form or select it from the New Items menu.

To use the form, select a date in the calendar and click the New button.

To create the form:

1. Open a new Outlook Appointment form
2. If the Developer ribbon is not visible, go to File, Options customize Ribbon and add a check to enable the Developer ribbon
3. On the developer ribbon, click Design This Form
4. Click View Code button to open the Script Editor. (It looks like Notepad.)
5. Paste the Script into the editor window and close the editor.
6. Test the form by clicking the Run This Form button
7. Publish it by clicking Publish
8. Enter a name for the form.
9. Close the form and return to Outlook

To set the form as the default for the folder, right click on the folder and choose Properties. Select the form from the 'When posting, use form' dialog.

Function Item_Open ()

Dim SelCalendarDate
SelCalendarDate = DateValue(Item.Start)
Item.Start = SelCalendarDate & " " & TimeValue("8:00 AM")
Item.End =   SelCalendarDate & " " & TimeValue("6:00 PM")

End Function

Related Posts:

1. 

   How to Show Appointments as "Free" by Default
2. How to customize Outlook Contacts so that the Home address is the defa

   Show the Home Address on a Contact Form by Default
3. 

   Designing Custom Outlook Forms
4. 

   How to Insert the Date and Time into an Outlook Item