如何检测用户选择了整行，并区分是否选择了多行

Question

如何检测用户是否选择了工作表上的整行？

我想返回选择了哪一行，这样我就可以自动执行例程，比如复制与该行相关的数据。

我希望自动化适用于任何一行，而不是多行。

Answer 1

将其放入要运行的工作表的代码中。您也可以检查"address"属性来确定所选内容的位置。这不是一个完整的答案，但它应该会让您开始。

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim bEntireRow As Boolean
With Target   
bEntireRow = .Address = .EntireRow.Address
End With
If bEntireRow = True Then
MsgBox (Target.Rows.Count & " Rows Selected")
End If
End Sub