Would like to copy a cell reference used in another cell's formula. Cell's formula changes...

[MistakesWereMade]

So... I think I have a difficult question...

I have cells that are sorted via the vba code below...

Dim i As Integer


Private Sub Worksheet_Calculate()


Application.EnableEvents = False


For i = 1 To 1


    Range("C1:C501").Sort Key1:=Range("C1"), Order1:=xlAscending, Header:=xlYes
    
Next i


Application.EnableEvents = True


End Sub

Here is a picture for a visual of what I want to do.

The cell contents of the cells in the range "C1:C501" are determined by a formula. Because my code sorts these cells automatically after their input is changed, the cell references used in say, C2, changes often. I would like to take a particular cell reference used in the formula box and store it in another cell range. In other words... If the cell reference for a particular input requires that he formula in C2 uses cell reference E2, I would like to either store the value of E2 in a cell or literally store "E2" in a cell. I feel like this might be achievable with VBA...