Chris Macro
Well-known Member
- Joined
- Nov 2, 2011
- Messages
- 1,345
- Office Version
- 365
- Platform
- Windows
I got the below code from another thread but it only works when you click the textbox, not the actual text:
<font face=Calibri><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> HighPercent_Enter()<br> <br> <SPAN style="color:#00007F">With</SPAN> HighPercent<br> .SetFocus<br> .SelStart = 0<br> .SelLength = Len(HighPercent.Text)<br> <SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">With</SPAN><br> <br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>
<font face=Calibri><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> HighPercent_Enter()<br> <br> <SPAN style="color:#00007F">With</SPAN> HighPercent<br> .SetFocus<br> .SelStart = 0<br> .SelLength = Len(HighPercent.Text)<br> <SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">With</SPAN><br> <br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>