text of different colours in a single textbox

A

Adrian

Hi,

Is there a way to display text of different colours in a single textbox
? Thanks...
 
D

Don Lloyd

Hi,

With a Text Box from the Drawing toolbar you can adapt the following

Sub Test()
ActiveSheet.Shapes("Text Box 3").Select
Selection.Characters.Text = "Good Morning it's Thursday"
With Selection
.Characters(1, 4).Font.ColorIndex = 3
.Characters(5, 12).Font.ColorIndex = 4
End With
End Sub

Regards,
Don
 
Top