Question

excel里怎么利用vb写出个编程，计算出所选区域单元格中最小数

excel里怎么利用vb写出个编程，计算出所选区域单元格中最小数？？
下面我自己乱写的= =。。。。完全不知道怎么写。。。。

Public Sub Test14_5()
Dim rngcell As Range
Dim iMin As Range
For Each rngcell In Selection
If rngcell.Value < 32767 Then

End Sub

Answer 1

Sub 计算()
MsgBox Application.Min(Selection)
End Sub

具体的步骤：

1、打开Excle的vbe。

2、把上述的代码加入的vbe中。

3、返回到Excle的界面，选择单元格区域。单击“宏-计算-执行”

4、结果就会显示

Answer 2

Sub test()
Dim rngcell As Range, iMin As Double
Set rngcell = Selection
iMin = Application.Min(rngcell.Value)
MsgBox iMin
End Sub