vba 窗体中如何表示选择的行数
答案:2 悬赏:40 手机版
解决时间 2021-01-30 03:28
- 提问者网友：城市野鹿
- 2021-01-29 22:55
例如：我当前选中2行时，我需要窗体中TextBox1.Text=2，选择三行时TextBox1.Text=3，代码要如何写？另外使用If SelectRng.Count =2 Then 提示要求对象错误。
最佳答案
- 五星知识达人网友：冷風如刀
- 2021-01-29 23:42
'第一个问题
If TypeName(Selection) = "Range" Then
TextBox1.Text = Selection.Rows.Count
Else
TextBox1.Text = 0
End If第二个问题:
使用If SelectRng.Count =2 Then 提示要求对象错误,因为没有给变量SelectRng指定正确的对象引用。
If TypeName(Selection) = "Range" Then
TextBox1.Text = Selection.Rows.Count
Else
TextBox1.Text = 0
End If第二个问题:
使用If SelectRng.Count =2 Then 提示要求对象错误,因为没有给变量SelectRng指定正确的对象引用。
全部回答
- 1楼网友：傲气稳了全场
- 2021-01-30 00:53
有许多种方法可以找到最后一个单元格，如使用等：.specialcells(xlcelltypelastcell).row
sub test()
dim r as range
with activesheet
lastrow = .cells(.rows.count, "o").end(xlup).row
end with
set r = range("f6:o" & lastrow)
r.select
end sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯