Thread: Active Cell & Data Validation question

I am using the code below to move the active cell one row down after
making a selection from a data validation list...

'-------------------------------------------------------------------------

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As
Range)
If ActiveCell.Validation.Type = xlValidateList Then
ActiveCell.Offset(1, 0).Activate
End If
End Sub


'-------------------------------------------------------------------------


The problem I have is when I enter a value into a cell with data
validation other than list (decimal or whole number) that is above a
cell with a data validation list, the active cell moves 2 rows down.

Are there any ideas on how to force the active cell to the row
immediately below?

Thank you in advance.

-M

Check Tools>Options>Edit and see if the Move direction after Enter checkbox
is ticked.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"michael" <mcastellano@gmail.com> wrote in message
news:1149034270.155600.222550@y43g2000cwc.googlegroups.com...
> I am using the code below to move the active cell one row down after
> making a selection from a data validation list...
>
> '-------------------------------------------------------------------------
>
> Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As
> Range)
> If ActiveCell.Validation.Type = xlValidateList Then
> ActiveCell.Offset(1, 0).Activate
> End If
> End Sub
>
>
> '-------------------------------------------------------------------------
>
>
> The problem I have is when I enter a value into a cell with data
> validation other than list (decimal or whole number) that is above a
> cell with a data validation list, the active cell moves 2 rows down.
>
> Are there any ideas on how to force the active cell to the row
> immediately below?
>
> Thank you in advance.
>
> -M
>