You can get a reference to the folder in code without selecting it, then
instantiate a specific form and display it using something like:
Dim objMail As Outlook.MailItem
Dim objInbox As Outlook.MAPIFolder
Dim objNS As Outlook.NameSpace
Set objNS = Application.GetNamespace("MAPI")
Set objInbox = objNS.GetDefaultFolder(olFolderInbox)
Set objMail = objInbox.Items.Add("IPM.Note.MyCustomFormName")
objMail.Display
Set objMail = Nothing
Set objInbox = Nothing
Set objNS = Nothing
You can access other folders by working through Folders collections in each
folder. i.e.
objMail.Folders("InboxSubFolder").Folders("InboxSu bFolderSubFolder")
--
Eric Legault - Outlook MVP, MCDBA, MCTS (SharePoint programming, etc.)
Try Picture Attachments Wizard for Outlook:
http://www.collaborativeinnovations.ca
Blog:
http://blogs.officezealot.com/legault/
"Jim" wrote:
Hello, I have a mailbox with some custom forms and I'd like to add a button
to the toolbar that would launch a specific form.
Can someone point me in the right direction as to how to accomplish this?
I've added a button to launch the select forms window but they still have to
change folders and select the correct form. I'm looking to automate this
with just a button click.
Thanks
Jim