einen guten morgen allen im Forum
wer kann mir helfen? Ich will mit einem Optionsbutton den Text in der Textbox1 ändern, in der Art das in der ausgewählte Bereich durch die Caption des Optionsbutton ersetz wird.

Private Sub OptionButton3_Click()
With TextBox1
.SetFocus
.SelStart = 14
.SelLength = 5
'OptionButton3 caption einfügen
End With
End Sub