每当按下 Enter 键时更改单元格的值

每当按下 Enter 键时更改单元格的值

我有一个名为“ ”的命名范围(一个单元格),Indicator它采用值01

我想要一段代码,当用户在工作簿中的任何位置按下键时,将的值设置Indicator为。0Enter

有人可以向我展示执行此操作的 VBA 代码吗?

答案1

您可以使用 OnWorksheet_Change 并指定单元格地址,然后输入条件也许会有所帮助

答案2

假设 Sheet1 中有一个单元格的值为 0 ( Range("E4")),则Alt+F11

单击 sheet1,从声明下拉菜单中选择工作表,并将方法选为激活,然后写入以下代码:

Private Sub Worksheet_Activate()   
    If Range("F5") = 0 Then
        Range("F5") = 1
    ElseIf Range("F5") = 1 Then
        Range("F5") = 0
    End If
End Sub

相关内容