想要用VBA判断数组中的最大值、最小值、第N大值、第N小值,可以用以下代码: Sub 判断数组中的最值() arr = Array(10, 1, 5, 4, -6, 9, 11, 9, -1) MsgBox Application.Max(arr) '判断数组中的最大值 MsgBox Application.Min(arr) '判断数组中的最小值 MsgBox Application.Large(arr, 2) '判断数组中的第二大值 MsgBox Application.Small(arr, 2) '判断数组中的第二小值 End Sub 如果想要更改判断第N个大、小值,只需更改以上代码的Application.Large、Application.Small的第2个参数即可。 需要注意的是,Application.Large和Application.Small函数的第N大、小值,不是数值内第N大、小值,而是数组内第N大、小值,也就是说,如果数组内最大的值是10,而数组内有3个10,那么无论是最大值,还是第2大值、第3大值,都会是10。 想要了解更多VBA相关知识,欢迎到http://moqingyan.360doc.com我的个人图书馆查看。 |
|