在EXCEL表中如何在另一个单元格中显示这个单元格输入过的最大值

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column 1 Then Exit Sub If Target.Value > Target.Offset(0, 1) Then Target.Offset(0, 1).Value = Target.Value ElseIf Target.Value <