Excel VisualBasic Script

Sub SelectEntireRow()
    Selection.EntireRow.Select
End Sub