I have a piece of code that I just want to run when the sheet recalculates. However the code loops and I want it to stop as soon as it has finished the update. Any ideas... code below!!
Private Sub Worksheet_Calculate()
Sheets("Leaderboard").Activate
Range("A4:C61").Select
Selection.sort Key1:=Range("C5"), Order1:=xlDescending, Key2:=Range("B5") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
End Sub
Private Sub Worksheet_Calculate()
Sheets("Leaderboard").Activate
Range("A4:C61").Select
Selection.sort Key1:=Range("C5"), Order1:=xlDescending, Key2:=Range("B5") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
End Sub