0

範囲内の最後の行を見つける方法を探しましたが、見つけた答えは、せいぜい、シート全体の最後に使用された行しか得られませんでした。

たとえば、A1:A10、B6:B9、および に要素があるとしC1:C4ます。columns の最後の行を見つけたいB:Cです。この場合、答えは行 9 になるはずです。 を使用しSpecialCells(xlLastCell)てみましたが、行 10 の答えしか得られませんでした。

非常に簡単な答えがあると確信していますが、それを見つけることができません! 誰でも助けることができますか？

4

3 に答える 3

1

B:CVBA を使用して列の最後の行の番号を返す方法の例を次に示します。

Sub ReturnLastRow()
    MsgBox "Last row in columns B:C is " & _
        WorksheetFunction.Max(ActiveSheet.Cells(Rows.Count, 2).End(xlUp).Row, ActiveSheet.Cells(Rows.Count, 3).End(xlUp).Row)
End Sub
于 2013-10-31T20:29:51.027 に答える
0

必ずしも特定の行ではなく、特定の範囲の最後の行を取得するには、配列で行う方法と同様に、その範囲の最後のセルを参照するだけです。

Set RR = Range("B6:B9", "C4:C11")
MsgBox "The Last Row is " & RR(RR.Count).Row

また

Set RR = Range("B6:B11", "C4:C8")
MsgBox "The Last Row is " & RR(RR.Count).Row

上記の例では、どちらも最後の行として 11 を返します。

于 2013-10-31T20:59:27.663 に答える