User Form text box value to select column

[ikjohnson]

Hi,

How could an entry in a text box on a user form be used to select a column?
For example, if "T" (without quotes) is entered in a text box, and a command button is clicked, column T is selected. Something like:

<font face=Courier New><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> CommandButton1_Click()<br><br><SPAN style="color:#007F00">' Code here to retrieve value of text box in order to select column</SPAN><br> Columns("T:T").Select<br><br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>

 

[jim may]

Dim res As String
res = TextBox1.Text
On Error GoTo errhandler
ActiveSheet.Columns(res).Select
Exit Sub
errhandler:
MsgBox "You can enter a Column LETTER Only"

 

[ikjohnson]

Jim,

Thank you; just what I wanted.
I also tested the error handling, and an entry such as "T,W" (without quotes) triggers the message box, while an entry such as "T:W" selects columns T to W.