Having trouble sending a workbook by email, the only way that I can insert a message into the email is by using the code below. Unfortunately, under the message is a routing message that I don't want. Is there any way that I can send a mail and include a message without any other system messages being included. Hope someone can help.
Thanks
Matt
Sub sendmail()
ActiveWorkbook.HasRoutingSlip = True
With ActiveWorkbook.RoutingSlip
.Recipients = "test@test.co.uk"
.Subject = "Test"
.Message = "This is a Test!"
End With
ActiveWorkbook.Route
End Sub
Thanks
Matt
Sub sendmail()
ActiveWorkbook.HasRoutingSlip = True
With ActiveWorkbook.RoutingSlip
.Recipients = "test@test.co.uk"
.Subject = "Test"
.Message = "This is a Test!"
End With
ActiveWorkbook.Route
End Sub