Copy/paste dynamic # over as "text", then auto-update "text" number if dynamic # becomes larger?

[Bret1]

Hello,
I have a file I open and save everyday. I have a column with dynamic numbers (s10:s50). I'd like to keep track of the highest numbers for each row down column (S)...
If I copy column (s) over to column (t) as static text, is there a way to make a condition for each cell in column (t) to update it to the column (s) number if column (s) number turns greater than the static column (t) number? So, column (s) will show dynamic numbers, and column (t) will show the highest number column (s) has ever shown. Thanks!

 

[pbornemeier]

Put this code in the codepage of the worksheet that holds the data. It will update T10:T50 if any cell in S10:S50 changes and is greater than the T-column value in the same row.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim rngCell As Range
    If Not Intersect(Target, Range("S10:S50")) Is Nothing Then
        For Each rngCell In Range("S10:S50")
            If rngCell.Value > rngCell.Offset(0, 1).Value Then rngCell.Offset(0, 1).Value = rngCell.Value
        Next
    End If
End Sub