How do i select a default catagory to automatically appear when a new meeting
is created? This will be so that all new meetings and appointments have a
default category.

It would involve creating a custom form.

If this is for your personal use, it's not difficult to do in VBA code in the built-in ThisOutlookSession module:

Dim WithEvents colInsp As Outlook.Inspectors

Private Sub Application_Startup()
Set colInsp = Application.Inspectors
End Sub

Private Sub colInsp_NewInspector(ByVal Inspector As Inspector)
Dim objAppt As Outlook.AppointmentItem

If Inspector.CurrentItem.Class = olAppointment Then
Set objAppt = Inspector.CurrentItem
With objAppt
If .Size = 0 Then
.Categories = "My Default Category"
End If
End With
End If
End Sub

The one oddity is that when the appointment opens, you won't see "My Default Category" in the Categories box at lower right, but if you click the Categories box, it definitely will appear there. I don't know of a workaround for that problem, but again if this is for your personal use, you can get used to it.

--
Sue Mosher, Outlook MVP
Author of
Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx


"Hardke01" <(E-Mail Removed)> wrote in message news:CFAA9D0C-060E-4EC2-B314-(E-Mail Removed)...
> How do i select a default catagory to automatically appear when a new meeting
> is created? This will be so that all new meetings and appointments have a
> default category.

Check your macro security settings with Tools | Macro | Security . They need to be Medium or Low. *(I l keep mine at Medium.) Restart Outlook if you change the security level.

If you're new to Outlook VBA macros, these web pages should help you get started:

http://www.winnetmag.com/Articles/In...eID=21522&pg=1
http://www.outlookcode.com/d/vb.htm


--
Sue Mosher, Outlook MVP
Author of
Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx


"Hardke01" <(E-Mail Removed)> wrote in message news:1AF81519-D724-4E4D-8C64-(E-Mail Removed)...
> Sue,
>
> Thanks for the help on that one.
> I have inserted the code into the "ThisOutlookSession" module and saved it
> as the default name of VBAProject.OTM
>
> Do i need to do anything else to get it to work?
> what do i do next to get it to implement this every time i start up outlook?
>
> Thanks
> Keith Harding
>
> "Sue Mosher [MVP-Outlook]" wrote:
>
>> If this is for your personal use, it's not difficult to do in VBA code in the built-in ThisOutlookSession module:
>>
>> Dim WithEvents colInsp As Outlook.Inspectors
>>
>> Private Sub Application_Startup()
>> Set colInsp = Application.Inspectors
>> End Sub
>>
>> Private Sub colInsp_NewInspector(ByVal Inspector As Inspector)
>> Dim objAppt As Outlook.AppointmentItem
>>
>> If Inspector.CurrentItem.Class = olAppointment Then
>> Set objAppt = Inspector.CurrentItem
>> With objAppt
>> If .Size = 0 Then
>> .Categories = "My Default Category"
>> End If
>> End With
>> End If
>> End Sub
>>
>> The one oddity is that when the appointment opens, you won't see "My Default Category" in the Categories box at lower right, but if you click the Categories box, it definitely will appear there. I don't know of a workaround for that problem, but again if this is for your personal use, you can get used to it.
>>
>> --
>> Sue Mosher, Outlook MVP
>> Author of
>> Microsoft Outlook Programming - Jumpstart for
>> Administrators, Power Users, and Developers
>> http://www.outlookcode.com/jumpstart.aspx
>>
>>
>> "Hardke01" <(E-Mail Removed)> wrote in message news:CFAA9D0C-060E-4EC2-B314-(E-Mail Removed)...
>> > How do i select a default catagory to automatically appear when a new meeting
>> > is created? This will be so that all new meetings and appointments have a
>> > default category.
>>