Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi,
I have controls on my worksheet and have code that moves from one control to another. That works fine. I would like to jump from one control to a cell address, but the following doesn't seem to work. Any suggestions would be greatly appreciated! Private Sub GroupBox10_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, _ ByVal Shift As Integer) Dim bBackwards As Boolean Const ctlPrev As String = "ComboBox2" Select Case KeyCode Case vbKeyTab, vbKeyReturn, vbKeyDown, vbKeyUp Application.ScreenUpdating = False 'Determine forwards or backwards bBackwards = CBool(Shift) 'Activate the appropriate control based on key(s) pressed If bBackwards Then ActiveSheet.OLEObjects(ctlPrev).Activate Else Range("D20").Activate End If Application.ScreenUpdating = True End Select End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
r/t 2110 - Can't Move Focus to control | Excel Programming | |||
Move Control with Scroll | Excel Programming | |||
Move from cell A1 to R362 by selecting control tool or something | Excel Discussion (Misc queries) | |||
How do I get a Control Button in Excel to move down the page when. | Excel Discussion (Misc queries) | |||
How to get Control M to move cursor down | Excel Programming |