在特定行之后，在列中为单元格运行vba脚本

我正在使用此代码，因此当用户单击列中的AQ时，该行中的后续单元格随date更新。

不过，我正试图得到这个只在第8行或更高的那些单元格上工作，所以换句话说，我不想让行7,6,5,4,3,2,1受到影响。

有一种方法，我可以说，如果行是8更高？ 或8-37？

当单元格AQ =某些文本时，是否还有一种方法只能运行此代码？ 否则什么都不要做？

Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = Range("AQ8").Column Then Range("AS" & Target.Row).Value = "=TODAY()" End If End Sub 

谢谢

Answer 1

 Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Row > 8 And Target.Column = 43 And Target.Value = "Send Email" Then Target(1, 2).Value = Date() End If End If End Sub 

嵌套在工作表模块中。