How do I input the code to sort the selected range from here?

The range may be any row, so leave that portion open/variable.


Range("D65534").Select
Selection.End(xlUp).Select
Range(Selection, Selection.End(xlToRight)).Select