how do i...

[jsw6]

create a macro using this code, i'm a rookie.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheets("Sheet2").Range("A1") = ActiveCell.Row
End Sub

also, how would i adjust the above code to take three specific cells within the active row in sheet1 and put them into three separate cells in sheet2?

 

[ChrisUK]

Try this code:

For Each c In Range("A4,C4,F4")
Worksheets("sheet2").Range(c.Address) = c.Value
Next

It assumes you want the cells copied from the same columns to the same columns, ie missing out unselected columns

You can change the range in the first line to have as many cells as you like or use a different format if all the cells are together (A1:A10)

HTH