Userform Textbox - Cursor Position

[SiriusProjects]

Hi All,

I expect similar questions have been asked about this, so apologies if this has already been answered.

Basically I want to return the position of the cursor when the mouse is clicked anywhere in a textbox.

I know you can use SelStart, but what is causing me a problem is that it is not resetting for each line.

Example text:

Order No Description Qty Price
----------- -------------- ---- ------
1234567 Item Name 1 12.00

If I click the mouse between the "d" and "e" in the word "Order", SelStart returns 3, which is fine.

However if I was to click the mouse between the "3" and "4" of the Order Number, I would still expect it to return 3 because its 3 characters from the left on that specific line, but SelStart returns the cursor position based on a count from the first character in the text box which is what I don't want.

I can get the X position using CurLine, I'm just stuck on getting the Y position so that I can generate X and Y co-ordinates.

It might be an obvious solution, but I'm having a bit of a mind blank and just can't see it, so any help would be appreciated.

Thanks.

[Andy Pope]

You need to take the CRLF at the end of each line into account.

This example displays character to left of cursor, included any within a selection.
You can see how the further down the lines you go the more it is out of sync.

[SiriusProjects]

Thanks for the help Andy.

To give you a clearer picture of what I am trying to achieve, I want to replicate the function of the Text Import Wizard in Excel where you use the fixed width option and move the vertical indicators to define the columns.

I'm not looking to add the vertical indicators or anything like that. I just want to be able to return a series of coordinates which would represent the column positions.

The data is being retrieved from a text file and the only issue is that the headers aren't necessarily on row one of the file. If they were then using SelStart and SelLength on this row would give me the desired result. I think I may have answered my own question saying that. The data retrieved isn't saved or anything so I could simply remove any lines above the header so that line of data becomes the top row.

[Andy Pope]

The workbook contains code to resolve the problem. But moving the row of data you are interested in to the top of the text box will also work.