PDA

View Full Version : Solved: INCLUDE SIGNATURE IN AUTOMATED MAIL SENDING



IrishCharm
04-16-2008, 06:50 AM
Hi,

I have the below code which automatically sends an email and attaches a spreadsheet. The problem is that i lose my signature. (i.e. if you open Excel and go file-send to- send as attachment, you have to manually go and add your signature).

Do you know how in my code below i can include for the signature in the file?

All help would be greatly appreaaciated!!!

Sarah



With objOutlookMsg
Do Until ActiveCell = RecipList
ActiveCell.Offset(2, 0).Select
Loop
ActiveCell.Offset(0, 2).Select
If ActiveCell <> "" Then
Do Until ActiveCell = ""
Set objOutlookRecip = .Recipients.Add(ActiveCell)
ActiveCell.Offset(0, 1).Select
Loop


'' send the message and attachment!!!

If AttachLink = "YES" Then
.Subject = Subject
.Body = Body
.Importance = olImportanceHigh
.ReadReceiptRequested = False
.Attachments.Add WB.FullName
End If

If AttachLink = "NO" Then
.Subject = Subject
.Body = Body
.Importance = olImportanceHigh
.ReadReceiptRequested = False

End If

For Each objOutlookRecip In .Recipients
objOutlookRecip.Resolve
Next
If DisplayMsg Then
.Display
Else
.Send
End If
End If
End With
Set objOutlook = Nothing

Aussiebear: Edited thread to place code in the vba tags.

mdmackillop
04-16-2008, 07:14 AM
NO NEED TO SHOUT!

IrishCharm
04-16-2008, 08:02 AM
NO NEED TO SHOUT!


Sorry!! Any help would be great thanks!

Sarah

:cloud9:

dominicb
04-16-2008, 02:35 PM
Good evening KinkyKuddles

I'm not that well up on Outlook (have to use Notes - yuk) but I know that Ron de Bruin provides a section on his site devoted to the signature within MS Outlook. Perhaps this will help you solve your problem :
http://www.rondebruin.nl/mail/folder3/signature.htm

HTH

DominicB

IrishCharm
04-17-2008, 04:41 AM
Hi Dominic,

that web page is great - i tweaked it a bit and it fits into my code perfectly.

Thanks so much for all your help

Sarah


:hi: