Sortering i excel - variabelt antal rækker

I forbindelse med dataimport, har jeg efterfølgende behov for at lave en faldende sortering i et celleområde, som kan varierer alt afhængigt af datamængden som importeres.

Ved hjælp af denne makro gøres arbejdet :

Sub SortérTopscore()

' SortérTopscore Makro

    Range(Selection, Selection.End(xlDown)).Select
    Range("A15:F70").Select
    Selection.Sort Key1:=Range("F16"), Order1:=xlDescending, Header:=xlGuess _
        , OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    ActiveWindow.ScrollRow = 61
    ActiveWindow.ScrollRow = 1
    Range("F5").Select

End Sub

... men her er det jo en forud defineret celleområde som udpeges. Hvordan skal makroen se ud, hvis det som udgangspunkt skal udpege et variabelt antal rækker ( afhængig af dataimporten )