(First READ the Thread, then answer. *********.)

BTT: You could compute the Position where to put the Textbox using TextHeight like this :


Private Sub List1_DblClick()
Dim nPos As Long
...