How to do when the Cell is in color jump to next cell?

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

jean - 13 Apr 2008 18:30 GMT

Hi,
I have a worksheet with some column in blue color background & when i enter
the data in this worksheet (direction Right when I press the ENTER key) I
would like if the next column is in blue the cursor automaticly jump to the
next column until the cell have no background color.
It is Possible?
Thank you very much

Jean

Reply to this Message

Rick Rothstein (MVP - VB) - 13 Apr 2008 19:17 GMT

I guess you could use SelectionChange event code something like this...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Interior.ColorIndex = 41 And _
Target.Column < Columns.Count And Target.Count = 1 Then
Target.Offset(0, 1).Select
End If
End Sub

Change the number 41 I used above to the ColorIndex value for your
particular Blue color.

Rick

> Hi,
> I have a worksheet with some column in blue color background & when i
[quoted text clipped - 7 lines]
>
> Jean

Reply to this Message

jean - 13 Apr 2008 20:20 GMT

Thank you very much.
I copy that in my sheets after changing the number of the colorindex & it
work beautifully.
Thank you again.
Jean

> I guess you could use SelectionChange event code something like this...
>
[quoted text clipped - 21 lines]
> >
> > Jean

Reply to this Message