添加链接
link管理
链接快照平台
  • 输入网页链接,自动生成快照
  • 标签化管理网页链接
Sub




    
 FindLastRow()
    LastRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
    MsgBox "The last row is " & LastRow
End Sub

这个宏将在活动工作表中找到第一列中最后一个非空单元格的行号,并在消息框中显示结果。

  •