True or False: The following macro will run without error:

Sub Test$()$

Sheets$("$Sheet$1").$Select

Range$("$A$1").$Select

For k $=1$ To $5$

ActiveCell.Offset$(1,0).$Range$("$A$1").$Select

Sheets$("$Sheet$1").$Select

ActiveCell.Offset$(5,0).$Range$("$A$1").$Select

Range$($Selection$,$ Selection.End$($xlToRight$)).$Select

Selection.Copy

Sheets$("$Sheet$2").$Select

ActiveSheet.Paste

Application.CutCopyMode $=$ False

End Sub