Set an Excel generated CDO email's priority or importance to 'high' or'highest'...

[Kevin Lyons]

Hello,

In reviewing Ron's code here, http://www.rondebruin.nl/cdo.htm, I am
looking for a method to set the email's priority or importance to 'high' or
'highest'. Is there a way to do so, such as from what he has listed?

With iMsg
Set .Configuration = iConf
.To = "(e-mail address removed)"
.CC = ""
.BCC = ""
.From = """Ron"" <[email protected]>"
.Subject = "This is a test"
.Importance = 2
.Priority = 2
.TextBody = "Hi there"
.AddAttachment "C:/" & WBname
' You can add any file you want with this line .AddAttachment
"C:/Test.txt"
.Send
End With

Neither line in bold/red appears to be working.

Additionally, in the email body of several messages (created via an
..HTMLBody variable), a few words are being broken in half and a space
added. In other cases, URLs are being split as well. For an example,
please see the following:

Conversion Account Statem ent --- 'a space was added in Statement'
http://education.ou.c om/ --- 'a URL space (%20) was added in between
..com

Any help is much appreciated.

Thanks much,

Kevin

 

[Ron de Bruin]

Hi

If the user use Outlook

Use this

..Item("http://schemas.microsoft.com/cdo/configuration/cdoImportance") = cdoHigh

Send me example workbook with the link problem

--
Regards Ron de Bruin
http://www.rondebruin.nl


Hello,
In reviewing Ron's code here, http://www.rondebruin.nl/cdo.htm, I am looking for a method to set the email's priority or importance to 'high' or 'highest'. Is there a way to do so, such as from what he has listed?

With iMsg
Set .Configuration = iConf
.To = "(e-mail address removed)"
.CC = ""
.BCC = ""
.From = """Ron"" <[email protected]>"
.Subject = "This is a test"
.Importance = 2
.Priority = 2
.TextBody = "Hi there"
.AddAttachment "C:/" & WBname
' You can add any file you want with this line .AddAttachment "C:/Test.txt"
.Send
End With

Neither line in bold/red appears to be working.

Additionally, in the email body of several messages (created via an ..HTMLBody variable), a few words are being broken in half and a space added. In other cases, URLs are being split as well. For an example, please see the following:

Conversion Account Statem ent --- 'a space was added in Statement'
http://education.ou.c om/ --- 'a URL space (%20) was added in between .com

Any help is much appreciated.

Thanks much,

Kevin

 

[Ron de Bruin]

Mmmm

This is not working correct

I only used other code to do this but this is only working if the reciever have Outlook Express.

I will try to get it working this evening

--
Regards Ron de Bruin
http://www.rondebruin.nl


Hi

If the user use Outlook

Use this

.Item("http://schemas.microsoft.com/cdo/configuration/cdoImportance") = cdoHigh

Send me example workbook with the link problem

--
Regards Ron de Bruin
http://www.rondebruin.nl


Hello,
In reviewing Ron's code here, http://www.rondebruin.nl/cdo.htm, I am looking for a method to set the email's priority or importance to 'high' or 'highest'. Is there a way to do so, such as from what he has listed?

With iMsg
Set .Configuration = iConf
.To = "(e-mail address removed)"
.CC = ""
.BCC = ""
.From = """Ron"" <[email protected]>"
.Subject = "This is a test"
.Importance = 2
.Priority = 2
.TextBody = "Hi there"
.AddAttachment "C:/" & WBname
' You can add any file you want with this line ..AddAttachment "C:/Test.txt"
.Send
End With

Neither line in bold/red appears to be working.

Additionally, in the email body of several messages (created via an ..HTMLBody variable), a few words are being broken in half and a space added. In other cases, URLs are being split as well. For an example, please see the following:

Conversion Account Statem ent --- 'a space was added in Statement'
http://education.ou.c om/ --- 'a URL space (%20) was added in between .com

Any help is much appreciated.

Thanks much,

Kevin

 

[Ron de Bruin]

Hi

I update my CDO page
http://www.rondebruin.nl/cdo.htm


See the Tips section
http://www.rondebruin.nl/cdo.htm#Tips



--
Regards Ron de Bruin
http://www.rondebruin.nl


Mmmm

This is not working correct

I only used other code to do this but this is only working if the reciever have Outlook Express.

I will try to get it working this evening

--
Regards Ron de Bruin
http://www.rondebruin.nl


Hi

If the user use Outlook

Use this

..Item("http://schemas.microsoft.com/cdo/configuration/cdoImportance") = cdoHigh

Send me example workbook with the link problem

--
Regards Ron de Bruin
http://www.rondebruin.nl


Hello,
In reviewing Ron's code here, http://www.rondebruin.nl/cdo.htm, I am looking for a method to set the email's priority or importance to 'high' or 'highest'. Is there a way to do so, such as from what he has listed?

With iMsg
Set .Configuration = iConf
.To = "(e-mail address removed)"
.CC = ""
.BCC = ""
.From = """Ron"" <[email protected]>"
.Subject = "This is a test"
.Importance = 2
.Priority = 2
.TextBody = "Hi there"
.AddAttachment "C:/" & WBname
' You can add any file you want with this line ..AddAttachment "C:/Test.txt"
.Send
End With

Neither line in bold/red appears to be working.

Additionally, in the email body of several messages (created via an .HTMLBody variable), a few words are being broken in half and a space added. In other cases, URLs are being split as well. For an example, please see the following:

Conversion Account Statem ent --- 'a space was added in Statement'
http://education.ou.c om/ --- 'a URL space (%20) was added in between .com

Any help is much appreciated.

Thanks much,

Kevin

 

[Julaf]

Julaf

Hi everyone, I've got a small problem.
I'd like to send my active sheet with this CDO code.
I use
.AddAttachment ThisWorkbook.ActiveSheet

but it looks like a problem
Run time erro '13'
Type-mismatch

don't really know why because it's the correct name of this sheet.

Hope to have news about that.
Thanks