ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   How to do when the Cell is in color jump to next cell? (https://www.excelbanter.com/excel-programming/409289-how-do-when-cell-color-jump-next-cell.html)

Jean

How to do when the Cell is in color jump to next cell?
 
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

Rick Rothstein \(MVP - VB\)[_1716_]

How to do when the Cell is in color jump to next cell?
 
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


"jean" wrote in message
...
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



Jean

How to do when the Cell is in color jump to next cell?
 
Thank you very much.
I copy that in my sheets after changing the number of the colorindex & it
work beautifully.
Thank you again.
Jean

"Rick Rothstein (MVP - VB)" wrote:

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


"jean" wrote in message
...
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





All times are GMT +1. The time now is 03:53 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com