vba中如何求指定表中指定列最大值

Question

如题所述

Answer 1

好像没有吧，但是你可以调用EXCEL的函数。
比如比较b1到b5中最大值并显示出来
msgbox MsgBox Application.WorksheetFunction.Max(Range("b1:b5"))

Answer 2

求A列中最大值：
Private Sub CommandButton1_Click()
k = 1
m = 0
Do Until Cells(k, 1) = ""
If Cells(k, 1) > m Then
m = Cells(k, 1)
End If
k = k + 1
Loop
MsgBox "A列最大值是：" & m
End Sub本回答被提问者采纳

Answer 3

=MAX(B1:B24)