Bold Words in Strings

SerranoG · September 3rd, 2004, 09:16 AM

No, I'm not going to tell someone off. :D

I'm using the DoCmd.SendObject method to write an e-mail message to someone and was wondering if there's a way to bold one word out of a sentence. For example, this does not work, but it'll give you an idea of what I want.

strEmailMsg = "PSM No. " & Format(Me.txtPSMNo, "[Bold]") & " was assigned..."

So in the e-mail message, you'd see

PSM No. PSM-2004-0001 was assigned...

Is there a way? My e-mail client is Novell GroupWise.

Thanks!

Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division

cc16 · September 8th, 2004, 02:41 PM

SerranoG

I to have problems with the VBA code for bold. I came to the conclusion that words do not want to be bolded in VBA code. ;) J/K but I did find this page that discussed making a box and making the border darder. the code reads something like this
Private Sub Report_Page()
       On Error Resume Next
         ' Set Thickness and Border Style
         Me.DrawWidth = 6 ' larger number, thicker line
         Me.DrawStyle = 0 ' 0 to 6 = solid to invisible

         ' object.Line (x1, y1) - (x2,y2), color, [Box=B]
         Me.Line (0, 0)-(Me.ScaleWidth, Me.ScaleHeight), vbGreen, B
       End Sub

maybe the characters and formating in bold has something to do with the draw style or width. I don't know if this is helpful.

flathead4t1 · September 15th, 2004, 08:46 PM

If your email client allows for formatting as html then it is fairly easy to add colors, bold italic etc... I am only familiar with ms outlook but here is an example...

Sub CreateHTMLMail()
'Creates a new e-mail item and modifies its properties.

 Dim olApp As Outlook.Application
 Dim objMail As Outlook.MailItem
 Set olApp = Outlook.Application
 'Create e-mail item
 Set objMail = olApp.CreateItem(olMailItem)

 With objMail
 'Set body format to HTML
 .BodyFormat = olFormatHTML
 .HTMLBody = "<HTML><H2>The body of this message will appear in HTML.</H2><BODY>Enter the message text here. </BODY></HTML>"
 .Display
 End With
End Sub

message in the above example would be bold....
Hope this helps.

jmaronilla · September 15th, 2004, 11:23 PM

Greg,
I am not sure if this will work:

strEmailMsg = "PSM No. " & Me.txtPSMNo & " was assigned..."

or

strEmailMsg = "PSM No. " & Me.txtPSMNo & " was assigned..."

John

SerranoG · September 21st, 2004, 10:54 AM

John,

No go... both ways are taken literally.

Changing the e-mail type to HTML as FlatHead suggests would probably fix it, however, everyone's default e-mail view here is set to plain text. The only ones who would see it are those VERY few who set it otherwise. I'll just leave it as is...

Thanks for your suggestions.

Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division

jmaronilla · September 23rd, 2004, 05:20 PM

Try this instead:

strEmailMsg = "PSM No. '" & Me.txtPSMNo & "' was assigned..."

or

strEmailMsg = "PSM No. """ & Me.txtPSMNo & """ was assigned..."

John

SerranoG · September 24th, 2004, 06:46 AM

No, that will only work if the user's mailbox is defaulted to accept mail in HTML format. Almost everyone here is set for plain text.

Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division