Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Tab control from control to cell
Lets get this out of the way...I am using the following for tabbing
between controls in my Excel sheet. -------------------------------------------------------- Private Sub ComboBox103_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) Dim bBackwards As Boolean Const ctlPrev As String = "ComboBox102" Const ctlNext As String = "ComboBox104" Select Case KeyCode Case vbKeyTab, vbKeyReturn, vbKeyDown, vbKeyUp Application.ScreenUpdating = False bBackwards = CBool(Shift And 1) Or (KeyCode = vbKeyUp) If Application.Version < 9 Then Sheet1.Range("A1").Select If bBackwards Then Range(ctlPrev).Activate Else ActiveSheet.OLEObjects(ctlNext).Activate End If Application.ScreenUpdating = True End Select End Sub ------------------------------------------------------- This is fine but what If I want the next Item to be a cell in the document, lets say E22. How can I have it tab to that cell and then get E22 to tab away to the next thing I want a tab in? If that makes any sense I would appreciate the help. Thanks as Always, Jason Self --- Message posted from http://www.ExcelForum.com/ |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Tab control from control to cell
Jason ,
Just put the cell address in ctlPrev Const ctlPrev As String = "E2" Out of the way! -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) "JasonSelf " wrote in message ... Lets get this out of the way...I am using the following for tabbing between controls in my Excel sheet. -------------------------------------------------------- Private Sub ComboBox103_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) Dim bBackwards As Boolean Const ctlPrev As String = "ComboBox102" Const ctlNext As String = "ComboBox104" Select Case KeyCode Case vbKeyTab, vbKeyReturn, vbKeyDown, vbKeyUp Application.ScreenUpdating = False bBackwards = CBool(Shift And 1) Or (KeyCode = vbKeyUp) If Application.Version < 9 Then Sheet1.Range("A1").Select If bBackwards Then Range(ctlPrev).Activate Else ActiveSheet.OLEObjects(ctlNext).Activate End If Application.ScreenUpdating = True End Select End Sub ------------------------------------------------------- This is fine but what If I want the next Item to be a cell in the document, lets say E22. How can I have it tab to that cell and then get E22 to tab away to the next thing I want a tab in? If that makes any sense I would appreciate the help. Thanks as Always, Jason Self --- Message posted from http://www.ExcelForum.com/ |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Tab control from control to cell
I actually figured out just that not to long before you replied. I d
have the question though of once I have tabbed into that cell how I ca convince VBA to let me tab out. In the event of a control object would simply name the object. Private Sub ComboBox102_KeyDown how would I name this if it were refering to a specific cell like ou E -- Message posted from http://www.ExcelForum.com |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Tab control from control to cell
I think you are out of luck. Shapes have a KeyDown event, but cells don 't .
Normal tabbing takes over from then on. -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) "JasonSelf " wrote in message ... I actually figured out just that not to long before you replied. I do have the question though of once I have tabbed into that cell how I can convince VBA to let me tab out. In the event of a control object I would simply name the object. Private Sub ComboBox102_KeyDown how would I name this if it were refering to a specific cell like our E2 --- Message posted from http://www.ExcelForum.com/ |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Process control chart for quality control in exel? | Charts and Charting in Excel | |||
2007 Form Control/ActiveX Control font difference | Excel Discussion (Misc queries) | |||
Excel spin box - no Control tab in Format Control dialong box | Excel Worksheet Functions | |||
Difference between a Forms Control verus Active-X Control | Excel Discussion (Misc queries) | |||
Shift-Control Arrow and RefEdit Control? | Excel Programming |