How to name Excel worksheet based on min-max in column

[snb]

Sub M_snb()
   ActiveSheet.Name = "snb " & Format(Application.Min(Columns(3)), "yy-") & Format(Application.Max(Columns(3)), "yy")
End Sub