Thread: weird
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
LiSa LiSa is offline
external usenet poster
 
Posts: 17
Default weird

Hello,
I have a table in excel97 in which data is entered
downwards in columns. I am trying to set it so that when
the bottom of one column is reached then the first cell of
the next column is automatically activated.

The code I've tried so far is below, but I get a weird
response in that the code executes when clicking any cell
on the sheet, even when the active cell is clearly not one
of the ones specified.

Private Sub Worksheet_SelectionChange(ByVal Target As
Excel.Range)
Select Case ActiveCell
Case [a4] 'bottom of first column
[b1].Activate 'top of next column
Case [b4]
[c1].Activate
End Select
End Sub