On Sep 29, 10:11*am, Joel wrote:
You can add a textbox with the message

* * ActiveSheet.Shapes.AddTextbox(msoTextOrientationHo rizontal, 158.25,
180.75, _
* * * * 64.5, 37.5).Select
* * Selection.Characters.Text = "ABC"
* * With Selection.Characters(Start:=1, Length:=3).Font
* * * * .Name = "Arial"
* * * * .FontStyle = "Regular"
* * * * .Size = 10
* * * * .Strikethrough = False
* * * * .Superscript = False
* * * * .Subscript = False
* * * * .OutlineFont = False
* * * * .Shadow = False
* * * * .Underline = xlUnderlineStyleNone
* * * * .ColorIndex = xlAutomatic
* * End With



"jeff" wrote:
Is it possible to change the font of a msgbox? I have one that will
show text plus a cell value. I've tried changing the font of the cell,
but it doesn't change it when it's in the msgbox. I've looked in Help,
and in past posts, but cannot find anything on it. Maybe it can't be
done in VBA.
Thanks
j.o.- Hide quoted text -

- Show quoted text -

Thanks Joel
I'll look at this and see if I can incorporate this with what I'm
doing.
I appreciate the help.
j.o.