Range 범위 안에 함수를 넣을 수 없는 걸까요?

업무에 필요해 주먹구구 식으로 매크로 기록으로 VBA를 공부 중인 직장인입니다..

제목처럼 Range 부분에 함수를 넣어서 진행을 할 수는 없을까 싶어 질문을 남겨봅니다.

상황은 특정 문자열을 찾아 필터를 걸고, 내림차순으로 정렬이 필요한 상황입니다.

하지만 해당 문자열이 불러오는 file마다 위치가 달라 공통적으로 사용할 수 있는 코드를 짜고 싶습니다.

하지만 필터를 걸고 내림차순을 하면 Range에서 범위가 딱 정해져버려 다른 file에는 적용이 안 되는 형태로 코드가 짜여지더라구요..

해결방법이 없을까요?

Cells.Find(What:="target", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, MatchByte:=False, SearchFormat:=False).Activate    '특정 문자열"target" 찾기(해당 file에선 AE2에 위치, file 마다 다름)
Cells.FindNext(After:=ActiveCell).Activate
Selection.AutoFilter
ActiveWorkbook.Worksheets("Sheet2").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Sheet2").AutoFilter.Sort.SortFields.Add Key:=Range _
("AE2:AE1995"), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:= _
xlSortNormal '근데 여기서 범위 설정이 저 범위로 고정이 돼버림
With ActiveWorkbook.Worksheets("Sheet2").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply