我使用了以下工作表更改VBA代码,该代码应用于单个单元格引用,并用于根据数据验证列表中的选择调用宏。宏触发的事件适用于活动单元格的行。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(True, True) = "$H$2" Then
Select Case Target
Case "Yes"
Call StandardEntry
Case Else
'Do nothing
End Select
End If
End Sub
我现在希望能够将此工作表更改事件应用于同一列中的各个单元格,在活动单元格行中生成相同的事件,而不影响任何其他行。相同的数据验证已应用于列中的其他单元格。
感谢您协助编写适当的代码或调整上述代码以适应。
答案 0 :(得分:1)
谢谢@YowE3K!
更改
If Target.Address(True, True) = "$H$2" Then
到
If Target.Column = 8 Then
做了这个伎俩,是一个非常简单的解决方案! Yeehar!