I've modified the Macro that opens my custom form. I've added a button to the quick launch toolbar that appears on every email. The Macro gets the address in the To field of email #1, launches the custom form, places the address into the To field of the custom form, then closes the original (email #1).
Public Sub ComplexCustomForm()
Dim olfolder As Outlook.MAPIFolder
Dim olapp As Outlook.Application
Dim Items As Outlook.Items
Dim Item As Object
Dim m As mailItem
Set m = ActiveInspector.CurrentItem
f = m.To
Set olapp = CreateObject("Outlook.Application")
Set olfolder = olapp.GetNamespace("Mapi").folders("SHARED FOLDER WHERE IPM.Note RESIDES")
Set Items = olfolder.Items
Set Item = Items.Add("IPM.Note.ComplexCustomForm")
Item.Display
Item.To = f
m.Close olDiscard
Set m = Nothing
Set olfolder = Nothing
Set olapp = Nothing
Set Items = Nothing
Set Item = Nothing
End Sub