Question

我是Excel VBA的新手。我从这个数据中得到了742行的一些数据，我想从MAX值到第一行进行选择。例如假设单元格“A480”中的最大值为“240”，因此我想从单元格“A480”中选择一列到单元格“A1”。

任何人都知道如何做到这一点。

Answer 1

试试这个：

Sub MaxNumberRow()
    Dim max As Double
    Dim rowNum As Long

    With Sheet1
        max = WorksheetFunction.max(.Columns(1))

        If max > 0 Then
            rowNum = .Columns(1).Find(What:=max, After:=.Cells(1, 1), LookIn:=xlValues, LookAt:= xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False).Row
            Range(Cells(1, 1), Cells(rowNum, 1)).Select
        End If
    End With
End Sub

从最大单元格到第一个单元格中选择一列

1 个答案: