I have a macro for sending a sheet or multiple using a command button click. I have to put each email address I want into the code itself.
I have another project I am working on with a group of emails that tend to chance as people come and go from a couple organizations. Right now I use a "Quick Steps" on outlook for sending an email to this group. I would like to use that for the the TO field in my VBA code. I set up a test group and outlook didn't recognize the address as it was just the name of the "Quick Steps" group. When I use the "Quick Steps" in outlook, I see each email as an individual and not the "Quick Steps" name. Below is the relevant part of the code.
With Destwb
.SaveAs TempFilePath & TempFileName & FileExtStr, FileFormat:=FileFormatNum
On Error Resume Next
With OutMail
.To = "Email Macro Test"
.CC = ""
.BCC = ""
.Subject = "Macro Email test"
.Body = ""
.Attachments.Add Destwb.FullName
'You can add other files also like this
'.Attachments.Add ("C:\test.txt")
.display 'or use .Display
End With
I have another project I am working on with a group of emails that tend to chance as people come and go from a couple organizations. Right now I use a "Quick Steps" on outlook for sending an email to this group. I would like to use that for the the TO field in my VBA code. I set up a test group and outlook didn't recognize the address as it was just the name of the "Quick Steps" group. When I use the "Quick Steps" in outlook, I see each email as an individual and not the "Quick Steps" name. Below is the relevant part of the code.
With Destwb
.SaveAs TempFilePath & TempFileName & FileExtStr, FileFormat:=FileFormatNum
On Error Resume Next
With OutMail
.To = "Email Macro Test"
.CC = ""
.BCC = ""
.Subject = "Macro Email test"
.Body = ""
.Attachments.Add Destwb.FullName
'You can add other files also like this
'.Attachments.Add ("C:\test.txt")
.display 'or use .Display
End With