[已解决]快速定位：求简洁的VBA语句

opelwang

  附件： 快速定位.rar (2.15 KB, 下载次数: 17)

2012-2-2 19:56 上传

点击文件名下载附件

.

最佳答案

月排行榜 / 总排行榜

sunjing-zxl

2012-2-2 20:14

1. Range("B3:K" & [B65536].End(xlUp).Row).Select
   
2. Range("B" & [B65536].End(xlUp).Row + 1 & ":K65536").Select

复制代码

跳转到最佳答案楼层

wcymiss

哪里的考试题？

sunjing-zxl

1. Range("B3:K" & [B65536].End(xlUp).Row).Select
   
2. Range("B" & [B65536].End(xlUp).Row + 1 & ":K65536").Select

复制代码

snrvgbb

意思不是很明确，不知道是不是这样的：
UsedRange.Select
MsgBox Val(Split(UsedRange.Address, "$")(2))
MsgBox Val(Split(UsedRange.Address, "$")(4))
MsgBox Val(Split(UsedRange.Address, "$")(4)) + 1