excel宏某一列统计最大最小值和大于某个值的区间占比

你可以使用Excel宏来完成这个任务。下面是一个简单的示例代码，它可以计算一个列中的最大值、最小值和大于某个值的区间占比：

Sub CalculateStats()
    Dim lastRow As Long
    Dim minValue As Double
    Dim maxValue As Double
    Dim aboveValueCount As Long
    Dim totalRowCount As Long
    
    lastRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
    minValue = ActiveSheet.Cells(1, 1).Value
    maxValue = ActiveSheet.Cells(1, 1).Value
    
    ' Loop through all values in the column
    For i = 1 To lastRow
        Dim currentValue As Double
        currentValue = ActiveSheet.Cells(i, 1).Value
        
        ' Update min and max values
        If currentValue < minValue Then
            minValue = currentValue
        End If
        
        If currentValue > maxValue Then
            maxValue = currentValue
        End If
        
        ' Count values above a certain threshold
        If currentValue > 50 Then ' Change 50 to whatever threshold you want
            aboveValueCount = aboveValueCount + 1
        End If
        
        totalRowCount = totalRowCount + 1
    Next i
    
    ' Calculate percentages
    Dim aboveValuePercentage As Double
    aboveValuePercentage = aboveValueCount / totalRowCount
    
    ' Output results
    MsgBox "Min value: " & minValue & vbCrLf & _
           "Max value: " & maxValue & vbCrLf & _
           "Percentage above 50: " & aboveValuePercentage
End Sub

这段代码假设你的数据在第一列中，且第一行是标题，第二行开始是数据。你需要将代码中的 `50` 更改为你想要的阈值。当你运行这个宏时，它将计算最大值、最小值和大于阈值的区间占比，并将结果显示在一个消息框中。你可以根据需要修改代码，以适应你的实际情况。