計算最大值的問題

[Billson]

請問vba中有沒有可以計算一群數字中最大值的函數
我現在只會用if a > b then.....一個一個去比較
快累死了...

[Billson]

謝謝
這是指引用excel本身提供的函數嗎
如果是
那最小值也可以這樣用囉
Sub 最小()
a = 1: b = 5: c = 6: d = 9: e = 11
m = Application.WorksheetFunction.Min(a, b, c, d, e)
MsgBox m
End Sub

最初由 常上此站的動物 發表
供您參考~~
Sub 最大()
a = 1: b = 5: c = 6: d = 9: e = 11
m = Application.WorksheetFunction.Max(a, b, c, d, e)
MsgBox m
End Sub