Hi Troelsi,
Welcome to VBAX.
The Max function should work
Sub FMax() Dim arr arr = Range("Data").Value MsgBox Application.WorksheetFunction.Max(arr) End Sub
Hi Troelsi,
Welcome to VBAX.
The Max function should work
Sub FMax() Dim arr arr = Range("Data").Value MsgBox Application.WorksheetFunction.Max(arr) End Sub
Last edited by Aussiebear; 04-08-2023 at 04:09 PM. Reason: Adjusted the code tags
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'