VBA - Range.Row.Count

前端 未结 10 1480
别那么骄傲
别那么骄傲 2020-12-24 13:23

I have written a simple code to illustrate my predicament.

Sub test()
    Dim sh As Worksheet
    Set sh = ThisWorkbook.Sheets(\"Sheet1\")

    Dim k As Lon         


        
10条回答
  •  长发绾君心
    2020-12-24 13:57

    k = sh.Range("A2", sh.Range("A1").End(xlDown)).Rows.Count
    

    or

    k = sh.Range("A2", sh.Range("A1").End(xlDown)).Cells.Count
    

    or

    k = sh.Range("A2", sh.Range("A1").End(xlDown)).Count
    

提交回复
热议问题