I've a VB macro linked to a graphic in a spreadsheet that currently has the following attached to it.

Sub Save_Send()
'
' Save_Send Macro
' Saves this form and attaches it to an email.
'
' The question is "How do I code it so that it
' populates the 'To:" address and the Subject line?".
'
ActiveWorkbook.Save
Application.Dialogs(xlDialogSendMail).Show
End Sub

This works well to create an email with the saved spreadsheet attached. Since this spreadsheet will always be sent to the same email address is there a way to code a static address (and maybe a static subject line) into the resulting email?