我们专注与office 2007.
首页 >> 技术文章 >> Excel2007
实现当激活工作表时鼠标自动定位并隐藏相关的行，
当激活某工作表时鼠标自动激活第三列空格位置
按版主bengdeng的指教
在此工作表的Activate事件中加入下面的代码：
Private Sub Worksheet_Activate()
Dim tRan As Range
Set tRan = Range("C1")
If tRan.value = "" Then
tRan.Select
Else
tRan.End(xlDown).Offset(1, 0).Select
End If
End Sub
可以实现
请问：能否同时实现自动隐藏鼠标激活位置之上第4行到第4行。（主要目的是要将已输入的数据隐藏，便于操作输入数据）
知道的共享下看看
下一篇:
实现当激活工作表时鼠标自动定位并隐藏相关的行
当激活某工作表时鼠标自动激活第三列空格位置
按版主bengdeng的指教
在此工作表的Activate事件中加入下面的代码：
Private Sub Worksheet_Activate()
Dim tRan As Range
Set tRan = Range("C1")
If tRan.value = "" Then
tRan.Select
Else
tRan.End(xlDown).Offset(1, 0).Select
End If
End Sub
可以实现
请问：能否同时实现自动隐藏鼠标激活位置之上第4行到第4行。（主要目的是要将已输入的数据隐藏，便于操作输入数据）
知道的共享下看看
声明：欢迎各大网站转载本站文章，还请保留一条能直接指向本站的超级链接，谢谢！
时间:2009-6-2 21:08:11,点击:0
上一篇:在Excel中怎么找出与条件匹配n个值？下一篇:
【OfficeBa论坛】：阅读本文时遇到了什么问题，可以到论坛进行交流！Excel专家邮件：342327115@qq.com（大家在Excel使用中遇到什么问题，可以咨询此邮箱）。
【声明】:以上文章或资料除注明为Office吧自创或编辑整理外，均为各方收集或网友推荐所得。其中摘录的内容以共享、研究为目的，不存在任何商业考虑。如有任何异议，请与本站联系，本站确认后将立即撤下。谢谢您的支持与理解！
相关评论
