Hi all!!!

I am trying to get my macro to run a sort in a non specific cell for column
D.....there are many steps up to this point, I will include the last couple
in the code...here is what I have so far....

Columns("C:C").Find(What:="x").EntireRow.Insert
Columns("C:C").Find(What:="x").EntireRow.Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Sort Key1:=Range("D63"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

Instead of the range being specific for D63, I want it to select the D
column after if finds X to the end of the wkst. Any ideas on how I can
accomplish this???

Thanks in advance......