Data Sort Code Issue

[tommyfernandez]

Greetings,

I have inserted the following code for sorting data in a worksheet that goes berserk each time I try to change data on the worksheet. Any advice on why this is happening?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A1:C56").Sort _
Key1:=Range("A1"), Order1:=xlDescending, Header:=xlYes
End Sub

Your responses are much appreciated!

-Tommy

[tommyfernandez]

My apologies - the version I have is 2012 MS Office..
-Tommy

[mike7952]

Guess this will do

Please Login or Register  to view this content.

[tommyfernandez]

That did it, Mike!

Thank you very much.

-Tommy

[tommyfernandez]

Here's a follow-up question: How can the code be modified to show blank cells withing the sorting range? For example, if I change the code to show data in ascending order, how do I modify the code to show no values at the top of the list?

-Tommy