largest value in range


Sub Largest()

Dim rng As Range

Dim maximum As Double

Set rng  Sheet1.Range("A1:Z100")maximum 

Application.WorksheetFunction.Max(rng)

MsgBox maximum
End Sub

Comments

Popular posts from this blog

50 Excel VBA Oral Interview Questions