A very helpful person gave me the following code last night on this forum:

Sub CopyRow()
Dim Msg As String
If ActiveSheet.Name = "Status" Then
Msg = "You must first select a cell in the row you want to copy on the
other sheet. "
MsgBox Msg, vbExclamation, "Alert"
Exit Sub
Else
Application.ScreenUpdating = False
Cells(ActiveCell.Row, 1) = Now
ActiveCell.EntireRow.Copy
Worksheets("Status").Rows(5).Insert
Application.CutCopyMode = False
Application.ScreenUpdating = True
End If
End Sub

It puts a time/date stamp in the first column of the row with the active
cell, copies the whole row to the clipboard, inserts a fresh row at row 5 of
the sheet called "Status," and then pastes the row in to the newly-inserted
row. It works really, really well on my PC at home, but I've discovered it
doesn't on the Macs one of our departments at work uses. The code runs--it
doesn't error out--but nothing is pasted in at the end. Nothing in the code
or workbook is at all different from last night.

Does anyone have any ideas?