Create an email with all the information entered.
To display the form from a button:
Sub DisplayFamilyForm()
Dim MyFolder
Dim myItem As MailItem
' create new outgoing message based on a form
Set MyFolder = Session.GetDefaultFolder(olFolderInbox)
Set myItem = MyFolder.items.Add("IPM.Note.Family")
myItem.Display
End Sub