![excel中怎么用vba 判断某一行被选中]()
1![excel中怎么用vba 判断某一行被选中]()
2![excel中怎么用vba 判断某一行被选中]()
3![excel中怎么用vba 判断某一行被选中]()
4![excel中怎么用vba 判断某一行被选中]()
5![excel中怎么用vba 判断某一行被选中]()
6![excel中怎么用vba 判断某一行被选中]()
7
excel中怎么用vba判断某一行被选中？如判断sheet1表中B4单元格所在的行如果被选中，则执行提醒。下面，小编就来给大家讲解实现方法。
方法/步骤
打开新文档
依次点击菜单“开始”——“程序”——“Microsoft Office”——“Microsoft Office Excel 2007”打开一个新建的excel文档
或同时按下“win+R”键，在打开的运行对话框中输入“excel”回车，打开一个新建的excel文档。
![excel中怎么用vba 判断某一行被选中]()
打开VB编辑器
在打开的excle窗口，依次点击工具栏“开发工具”——“Visual Basic”或直接按快捷键“ALT+F11”,打开VB编辑器。
![excel中怎么用vba 判断某一行被选中]()
![excel中怎么用vba 判断某一行被选中]()
- 相关内容非法爬取自百度经验
打开代码编辑窗
双击左侧工程窗口中的“sheet1”，打开“sheet1”代码编辑窗口。
![excel中怎么用vba 判断某一行被选中]()
开始编写代码
在代码窗口的下拉框中，分别选择“Worksheet”、"SelectionChange",下面会自动生成相应的过程块代码。
![excel中怎么用vba 判断某一行被选中]()
在过程中写入以下代码：
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表示选区的结束行号 。
![excel中怎么用vba 判断某一行被选中]()
运行测试效果
我们再回到excel窗口，测试一下代码是否能够正确运行，可以看到结果很成功。当然，你也可以修改msgbox语句成你需要的代码，进行更多操作处理。B4单元格也可以定义成可变值，如果有需要可以给小编留言。
![excel中怎么用vba 判断某一行被选中]()
END
