vba中min用法

vba中min用法
VBA中的min函数会返回一组数值中的最小值。

它是Excel内置函数的一部分，并且可以在VBA中使用。

语法：
Min(Num1, Num2, ...)
参数：
返回值：返回数字列表中的最小值。

使用min函数的示例：
Sub test()
Dim min1 As Integer
min1 = Application.Min(2, 4, 6, 8, 10) ' 返回最小值2
MsgBox min1
End Sub
在上面的示例中，我们使用了Application.Min函数，它和min函数的作用是一样的。

注意：这个函数也可以在Worksheet函数中使用，使用方法则是在Worksheet函数名称前面加一个Worksheet名。

例如，在Worksheet函数中使用，函数名应该为：
Sheet1.Min。

下面是一个使用VBA比较列表中最小值的示例。

在这个示例中，我们首先定义一个列表，然后使用min函数来比较这个列表中的最小值，并最终将结果打印到Excel工作表中。

Sub minFunction()
Dim myList As Variant
Dim min As Integer
Dim i As Integer
myList = Array(13, 5, 23, 7, 2, 19, 16, 11)
min = Application.Min(myList)
Range("A1").Value = "Numbers:"
For i = 0 To UBound(myList)
Range("A" & i + 2).Value = myList(i)
Next i
Range("B1").Value = "Minimum:"
Range("B2").Value = min
End Sub
总结：
min 函数可以用于VBA编程，也可以用于Excel工作表中，用于比较一组数字的最小值。

函数会返回数字列表中最小的数值。

在VBA中，min函数的使用方法和Excel中一样，一个简单的语法就可以调用。

该函数可以与For循环配合使用，用于比较列表或数组中的最小值，并将结果打印到Excel工作表中。