Thank you, that does very nicely.

Chuck Hague

"Tom Ogilvy" wrote:

Need VBA macro to return active cell address (R1C1)
msgbox ActiveCell.Address(1,1,xlR1C1)


Need to copyu current row of one spreadsheet to another after moving to
column A of that row.

ActiveCell.EntireRow.copy Destination:=worksheets("sheet2"). _
Cells(rows.count,"A").End(xlup)(2)

or

Sub ABCDEFGH()
ActiveCell.EntireRow.Copy
Worksheets("sheet2").Select
Cells(ActiveCell.Row, "A").Select
ActiveSheet.Paste

End Sub


would be different interpretation.

--
Regards,
Tom Ogilvy



"Chuck Hague" <Chuck wrote in message
...
Need to copyu current row of one spreadsheet to another after moving to
column A of that row.