Paste Range varies, need fix to replace and sort pasted cells only

[jhere01]

So when I paste it's always the same amount of cells from sheet "V All" cells A1:A9300 and they get pasted to the first blank cell in sheet "CLEAN ALL". BUT...
I need to do the replace and sort of the range its pasting onto only which will change based on where it pastes...
hope that makes sense
Help Please?!?!?!?!???
here's a piece of the current code I'm using...

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Selection.Replace What:=" ", Replacement:="", LookAt:=xlWhole, _
SearchOrder:=xlByRows, MatchCase:=True, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="#N/A", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=True, SearchFormat:=False, _
ReplaceFormat:=False
Application.CutCopyMode = False
ActiveWorkbook.Worksheets("CLEAN ALL").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("CLEAN ALL").Sort.SortFields.Add Key:=Range("A4"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortTextAsNumbers
With ActiveWorkbook.Worksheets("CLEAN ALL").Sort
.SetRange Range("A4:A9303")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply