Code for sending Email (Off2000)

[BatFace]

Thanks in advance to anyone who can help me (again).

This time I'm after code to send an email - from excel. I managed to get the message box to appear, with the file attached with -
Application.Dialogs(xlDialogSendMail).Show

then I added the below code (which I found here using keyword search).

'Select and Email each file
MailName = Selection.Range("A1&quot
MailFile = Selection.Range("B1&quot
Windows(MailFile).Activate
ActiveWorkbook.SendMail Recipients:=MailName,_ Subject:="Here ya go . . ."

But I can't get the email recipient to appear, and then actually have the message sent.

Once again thanks for your help!