VBA案例精选 获取指定单元格区域的起始和终止行号

代码运行结果:

代码截图:

代码文本:

Public Sub 技巧()

Dim RowBegin As Integer, RowEnd As Integer

Dim myRange As Range

Set myRange = ActiveSheet.UsedRange   '指定任意的单元格区域

RowBegin = myRange.Cells(1).Row       '获取该单元格区域的起始行号

RowEnd = myRange.Cells(myRange.Count).Row       '获取该单元格区域的终止行号

MsgBox "指定单元格区域的起始行号为 " & RowBegin _

& vbCrLf & "指定单元格区域的终止行号为 " & RowEnd     'RowBegin及RowEnd在此处的含义是获取指定单元格区域的起始和终止行号

Set myRange = Nothing

End Sub

【你们百度三天  不过我随口一句】
郑广学老师独家逐行手写沉浸式案例教学法 知其然更知其所以然
全套教程包含 VBA175例+函数操作408例+代码助手VIP
+100期直播回放
【268元进1000人高手VBA永久答疑群+880网站VIP】
买课咨询请加微信EXCEL880B

点击进入 郑广学老师Excel教程免费学7天 !


扫描二维码

(0)

相关推荐