excel - 当 4 个单元格不为空时启用命令按钮

Question

我有 4 个单元格 (S11:T12) 和一个命令按钮 1，我想要的是，直到所有 4 个单元格都被填充，命令按钮应该被禁用(我可以从属性选项卡中执行)并且一旦所有 4 个单元格都被填充号，命令按钮应启用，一旦这些单元格中的数据被删除，命令按钮应再次禁用。
我应该在哪个事件下编写代码？
我试过这个，但它不起作用。

Private Sub Workbook_Open(Cancel As Boolean)

    If Sheets("WorkArea").Range("S11:T12") = "" Then
        Sheets("WorkArea").CommandButton1.Enabled = False
            Else
        Sheets("WorkArea").CommandButton1.Enabled = True
    End If
      
End Sub

Answer 1

使用 WorkSheet_Change事件处理程序来处理单元格的变化，您可以使用 CountBlank工作表函数来确定范围是否为空。

Private Sub Worksheet_Change(ByVal Target As Range)
    If WorksheetFunction.CountBlank(Range("S11:T12")) = 4 Then
        Sheets("WorkArea").CommandButton1.Enabled = False
    Else
        Sheets("WorkArea").CommandButton1.Enabled = True
    End If
End Sub

Worksheet_Change

CountBlank

但是，根据您的问题，您实际上想要:

Private Sub Worksheet_Change(ByVal Target As Range)
    If WorksheetFunction.CountBlank(Range("S11:T12")) = 0 Then
        Sheets("WorkArea").CommandButton1.Enabled = True
    Else
        Sheets("WorkArea").CommandButton1.Enabled = False
    End If
End Sub