Macro to open a custom new message form

[Guest]

I have a custom message form that has been published in the Inbox in Outlook
2003. I do not want to change the default new message form to my form; I
just need a macro that will open my custom form. Being somewhat
code-challenged I'm having a problem creating the macro. I would appreciate
any help available. Thanks

 

[John Riddle]

You didn't say what you wanted to do with it once open. So, the following is a
very simple macro to open your custom for in the inbox (assuming the name of
your custom form is "CustomForm").

Sub OpenCustomForm()

Set myItem =
Application.Session.GetDefaultFolder(olFolderInbox).Items.Add("IPM.Note.CustomForm")
myItem.Display

End Sub

John

I have a custom message form that has been published in the Inbox in Outlook
2003. I do not want to change the default new message form to my form; I
just need a macro that will open my custom form. Being somewhat
code-challenged I'm having a problem creating the macro. I would appreciate
any help available. Thanks

 

[Guest]

John,
In certain instances I want to be able to open a custom new message form
instead of using the default new message form.

When I use your example below the debugger is calling for an expression
after the "=" on the first line.
Thanks

 

[Guest]

John, Thanks
I finally realized that the first two lines are actually one line. It works
great now.