View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
mudraker[_118_] mudraker[_118_] is offline
external usenet poster
 
Posts: 1
Default How do I: Cycle through selections by clicking on cell

Try this for starters

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Target.Count 1 Then
Exit Sub
ElseIf Target.Address < "$A$1" Then
Exit Sub
End If
If Range("b1").Value 3 Then
Range("b1").Value = 0
Else
Range("b1").Value = Range("b1") + 1
End If
Range("c1").Activate
End Su

--
Message posted from http://www.ExcelForum.com