Rich text

[valentindvf]

I have a rich text control with the following code:

With RtfBox
.SelStart = 10
.SelLength = 5
.SelColor = vbRed
.Text = .Text & "text"
End With

The problem is: after I add another text I loose the previous format.

Thanks.

[vbUserName]

What's your code?

[Phoney]

I have tried your code but I don't see the problem.

Works just fine

[JeffB]

Try using the .SelText property to allow .SelBold, .SelColor, .SelAlignment and all others format property to be applied only with the .SelText value, here is a quick example:

    With Me.RichTextBox1
        .Text = ""
        .SelStart = 0
        .SelLength = 0
        .SelColor = vbRed
        .SelText = "RED"
        .SelStart = 3
        .SelLength = 0
        .SelColor = vbBlue
        .SelText = "BLUE"
    End With

JeffB

[valentindvf]

After you format the text, add some more text and you'll see that the previous format disappears.

Thanks

[valentindvf]

Thanks

It works.