This is sheet code, did you put it in the right place?
"Where do I paste the code that I want to use in my workbook"
http://www.rondebruin.nl/code.htm
--JP
"Gordy99" <(E-Mail Removed)> wrote in message
news

9D7BB53-9B12-4D7E-9D58-(E-Mail Removed)...
> This is the code I put in per Rick R.:
> Private Sub worksheet_selectionchange(ByVal target As Range)
> Range("j1").Value = Cells(ActiveCell.Row, 1).Value
> End Sub
>
> Can't find it on the macro list and I don't see it running. I know I've
> done
> something wrong. Must have something to do with the name of the worksheet.
> Gordy
>