I have tried to modify some code from Ron de Bruin site, but its not working.
I just get my signature and not the main body which comes from a file
"BodyFile". Any ideas?

SigString =
Workbooks(WorkbookMain).Sheets(DCSheet(Data%)).Ran ge("Data_SignaturePath").Value

If Dir(SigString) < "" Then
Signature = GetBoiler(SigString)
Else
Signature = ""
End If

With OutMail
.To = ETo
.CC = Ecc
.BCC = EBcc
.Subject = ESubject
.HTMLBody = GetBoiler(AppPath & "\" & BodyFile) & "<br<br" &
Signature
If EAttach < "" Then .Attachments.Add EAttach
.Display
End With


--
Trefor