SendMail macro

Hejsa

Jeg har rask væk tyv stjålet denne lille macro fra en anden tråd her på siden.

Sub SendArk()

isvar = MsgBox("Vil du sende dette ark?", vbYesNo, "Send excel-ark")

If isvar = vbYes Then
ActiveWorkbook.SendMail Recipients:=[Adresser!H12].Value, Subject:="APMM Mdr Liste", ReturnReceipt:=False
End If

End Sub

Men nu ville jeg gerne have 2 ting mere med.
1. noget tekst - jeg har fundet ud af at det nok er noget med "bodytext" men jeg kan ikke hitte ud af at sætte den ind.
Der ud over så ville jeg også gerne at excel "bare" hentes min signatur automatisk sådan at den kom med på alle mails

Hilsen
IDa