Excel Max、Min 找最大、最小值

Function find_max()
    '初始值
        LotoShowCon = 100048
    '變數設定
        Set Sht348 = Sheets(LotoShowCon & "取位")
    '找最大
        'Dim arr_tmp(0 To 1) As Variant
        ar = Application.Max(Sht348.Range("E4:BA4")) '.Value
        Debug.Print ar
End Function

留言

這個網誌中的熱門文章

超任 三國志3代,登入武將金手指

歐姆龍 HEM-7600T 評價,購買心得分享(打臉文)

年青人眼鏡評價(負評),辛酸血淚史分享文