Excel 如何在VBA中提取数组中的最大值

Question

如题所述

Answer 1

Sub dd()
Dim arr
arr = Array(1, 2, 3, 4, 5, 6)
[A2] = Application.WorksheetFunction.Max(arr)

End Sub

用工作表函数MAX就可以了。