Tabbing between Text Boxes on an Excel worksheet

[conder]

I have text boxes on an Excel workbox but don't seem to be able to tab between them - any ideas?

 

[fuzzyfreak]

Odd, have you tried a blank sheet and creating three text boxes - highlight one and press tab, does this work?

 

[conder]

No doesn't work. These are text boxes off the VBA toolbar.

 

[fuzzyfreak]

You mean from the control toolbox as opposed to text boxes from the Drawing toolbar?

Should still be able to tab, I presume your tab button works. Have you looked at TabKeyBehavior at all?

 

[dtaylor]

Hi There - here is a way to do this. the only issue with this code is , depending on the number of textboxes it could be a bit of coding.

Private Sub txtPath_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Or KeyCode = vbKeyReturn Then
If CBool(Shift And 1) Then
txtPath.Activate
Else
txtMngField.Activate
End If
End If
End Sub

uses textbox from the control toolbox

this will need to be coded for each textbox (like i said could be alot of coding - but it works).

hope this helps

dan

 

[Tom Urtis]

One way...this will handle 3 TextBoxes, modify or add to suit.

Right click on your sheet tab, left click on View Code, and paste the following procedure into the large white area that is the worksheet module. Press Alt+Q to return to the worksheet.


Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Then TextBox2.Activate
End Sub

Private Sub TextBox2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Then TextBox3.Activate
End Sub

Private Sub TextBox3_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Then TextBox1.Activate
End Sub

 

[conder]

Cheers guys I'll give it a try.

 

[jgiovane]

Mr. Urtis,

Thank you so much for your post. It was very helpful. I entered your code and saved the file. At that time the tabbing worked. Unfortunately, when I return to the file the tabbing features are no longer working. Is there something else I should do?

Thanks