Macro to sort data in a list.

[SnowBalls]

Hi
I have a list with data in it and I need a macro to sort the data, but here is the tricky part, I am always adding and deleting rows, so I need the "range" in the macro to also grow and shrink. Any help will be greatly appriciated.

 

[Bill Rockenbach]

Use a dynamic named range. Many examples on the forum and teh web

 

[SnowBalls]

Thank you so much for your help. This is exactly what is was looking for.

 

[scoha]

I wrote this code for the same problem but it doesnt seem to work though cant work out why - any ideas?

Private Sub Worksheet_Change(ByVal Target As Range)
'Dynamic range is Consultants, sheet is Basis, start of Consultants d.range is G5
Dim r As Range
  
  Set r = Intersect(Target, Range("Consultants"))
   If r Is Nothing Or Target.Count > 1 Then Exit Sub
  
 
'This bit sorts first column
With Sheets("Basis")
    .Range("Consultants").Sort Key1:=.Range("g5"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End With


End Sub