I have posted some code below, it sorts the sheet within the rang
everytime a value is changed putting the highest value at the top, th
trouble is when it performs this the screen flickers while it
calculating no matter what i do!!!!, is there a way of doing what
need easier? or is there a way of stopping the flicker because it look
horrendous?

Regards,
Simon

Private Sub Worksheet_Calculate()
Range("A2:V40").Select
With Application
.ScreenUpdating = False
Selection.Sort Key1:=Range("T2"), Order1:=xlDescending
Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
_
DataOption1:=xlSortNormal
.ScreenUpdating = True
End With

End Su

--
Simon Lloy
-----------------------------------------------------------------------
Simon Lloyd's Profile: http://www.excelforum.com/member.php...nfo&userid=670
View this thread: http://www.excelforum.com/showthread.php?threadid=52560