Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Finding the maximum value in a range

Sub ShowMax()     Dim TheMax As Double     TheMax = WorksheetFunction.Max(range("A1:C3"))     MsgBox TheMax End Sub