Macro to open a custom new message form

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Clang - 18 Jul 2005 18:42 GMT

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

Reply to this Message

John Riddle - 18 Jul 2005 19:09 GMT

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

Reply to this Message

Clang - 18 Jul 2005 22:13 GMT

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

> 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
[quoted text clipped - 15 lines]
> code-challenged I'm having a problem creating the macro. I would appreciate
> any help available. Thanks

Reply to this Message

Clang - 19 Jul 2005 00:56 GMT

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

Reply to this Message