on click increment

[gsrikanth]

in my excel file, only i need to do click
on first click on cell get one, then two like this so on

vb code, This gave an idea this gave row name, but i need on click one, two , three, four so on

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim RowOffset As Long
Dim IndexCol As String


'Set values
RowOffset = 0
'Change the C to the column where you want the numbers to show
IndexCol = "C"

Intersect(ActiveCell.EntireRow, Columns(IndexCol)).Value = ActiveCell.Row + RowOffset
End Sub

[gsrikanth]

vba code corrections