Private Sub vishtml_Click()
With RichTextBox3
VarTXT = ""
For t = 0 To Len(.Text)
.SelStart = t
.SelLength = 1
If .SelBold = True Then
VarTXT = VarTXT + .SelText
End If
Next t
End With
VarDef = "" & VarTXT & ""
End Sub


ecco.

In pratica, quando clicco sul pulsante di comando, dovrei convertire il contenuto della richtexbox3 (che è quella su cui formatto il testo) in testo formattato in html...

Ho già chiaro quello che mi hai scritto sopra, però sono ancora un pò impedito sul da farsi in certe cose...

bye