我正在编写一个使用某列中的值的程序，我希望能够选择正在使用的单元格，使其成为当前活动单元格，以便将值移入公式。我希望程序在单元格处于活动状态后启动，而无需单击其他按钮，基本上是处于活动状态的单元格启动程序 我试着将程序命名为private sub ActiveCell_click()，我并没有期望太多，所以我做了一些研究，但没有找到任何与我所需要的类似的例子。
Private Sub Worksheet_ActivateCell(ByVal Target As Range)
Dim selectedCells as Integer
Dim triggerCell as Range
selectedCells = Selection.Count
Set triggerCell = ActiveSheet.Range("F8").
If selectedCells = 1 Then
If Not Intersect(Target, triggerCell) Is Nothing Then
Call CodeOfGodes
End If
End If
End Sub
1条答案
按热度按时间acruukt91#
在下拉菜单中的工作表代码，您可以选择其他选项，这可能是一个更好的然后下面，当将是大数据，你可以满足这么多的滞后.
where you can check some more functions
试试看，也许你的应用程序将不需要太多的资源，它会工作得很好：）或者仍然没有找到更好的：