Max Func returns Variable name

This sub below should return a value of 5, how do get this to return variable Five instead?

Sub MaxVar()
    Dim One, Two, Three, Four, Five As Integer
    One = 1
    Two = 2
    Three = 3
    Four = 4
    Five = 5

    MsgBox = WorksheetFunction.Max(One, Two, Three, Four, Five)
End Sub

Please advice!

Thank you,

NTB