订阅excel中怎么用vba 判断某一行被选中
来源：网络收集 点击： 时间：2024-07-16打开新文档
依次点击菜单“开始”——“程序”——“Microsoft Office”——“Microsoft Office Excel 2007”打开一个新建的excel文档
或同时按下“win+R”键，在打开的运行对话框中输入“excel”回车，打开一个新建的excel文档。
2/6打开VB编辑器
在打开的excle窗口，依次点击工具栏“开发工具”——“Visual Basic”或直接按快捷键“ALT+F11”,打开VB编辑器。
3/6打开代码编辑窗
双击左侧工程窗口中的“sheet1”，打开“sheet1”代码编辑窗口。
4/6开始编写代码
在代码窗口的下拉框中，分别选择“Worksheet”、SelectionChange,下面会自动生成相应的过程块代码。
5/6在过程中写入以下代码：
If (Target.Columns.Count = Sheet1.Columns.Count) And (Target.Row = Range(b4).Row) And (Target.Row + Target.Rows.Count Range(b4).Row) Then
MsgBox yes
Else
MsgBox no
End If
其中，Target.Columns.Count表示选区的列数，Sheet1.Columns.Count表示sheet1表列的最大数，如果两都相等，则表示整行选择；
Target.Row 表示选区的开始行号，Target.Row + Target.Rows.Count-1表示选区的结束行号 。
6/6运行测试效果
我们再回到excel窗口，测试一下代码是否能够正确运行，可以看到结果很成功。当然，你也可以修改msgbox语句成你需要的代码，进行更多操作处理。B4单元格也可以定义成可变值，如果有需要可以给小编留言。
EXCELVBA 版权声明：
1、本文系转载，版权归原作者所有，旨在传递信息，不代表看本站的观点和立场。
2、本站仅提供信息发布平台，不承担相关法律责任。
3、若侵犯您的版权或隐私，请联系本站管理员删除。
4、文章链接：http://www.1haoku.cn/art_961623.html
