Thanks...that's exactly what I need.

"Peter T" <peter_t@discussions wrote in message
...
Private Sub TextBox1_MouseMove(ByVal Button As Integer, _
ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Button = 1 Then
With TextBox1
Me.Caption = .CurLine & " " & .SelStart & " " & .SelLength
End With
End If
End Sub

Regards,
Peter T

"Bert" wrote in message
news:F14Uj.8546$Jb2.8467@trndny03...
Is there a way to test for the current insertion point in a Userform
textbox--if, for example, there are 100 characters in the textbox, and
the
user clicks at a point in the textbox, is there a way to find out where
in
the string the user has clicked.
Thanks.