Based on the selction from a drop down box, jump to a cell
I would like the cursur to jump to a column in the current row depending on
what was selected from the drop down box. This is for data entries. |
Based on the selction from a drop down box, jump to a cell
Something like this perhaps. HTH Otto
Private Sub Worksheet_Change(ByVal Target As Range) Dim TheCol As Long If Target.Count 1 Then Exit Sub 'Assuming the DV cell is A1 If Not Intersect(Target, Range("A1")) Is Nothing Then Select Case Target.Value Case Item1: TheCol = 3 Case Item2: TheCol = 6 Case Item3: TheCol = 7 'And so forth End Select Cells(Target.Row, TheCol).Select End If End Sub "kmoss" wrote in message ... I would like the cursur to jump to a column in the current row depending on what was selected from the drop down box. This is for data entries. |
All times are GMT +1. The time now is 10:40 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com