如何根據Excel中的單元格值啟用或禁用按鈕？

在本文中，我將介紹一些方法，根據Excel工作表中的單元格值來啟用或禁用按鈕。

使用VBA代碼根據兩列數據啟用或禁用兩個按鈕

使用VBA代碼根據兩個單元格值啟用或禁用按鈕

使用VBA代碼根據兩列數據啟用或禁用兩個按鈕

例如，在一個工作表中有兩個命令按鈕，如果A列有數據，則按鈕1啟用，按鈕2禁用；如果C列包含數據，則按鈕2啟用，按鈕1禁用。要解決此任務，以下VBA代碼可能會對您有所幫助。

1. 右鍵單擊包含按鈕的工作表，然後從上下文菜單中選擇「檢視程式碼」，請參見截圖：

2. 在Microsoft Visual Basic for Applications窗口中，請將以下代碼複製並粘貼到空白模塊中：

VBA代碼：根據兩列啟用或禁用兩個按鈕：

Private Sub Worksheet_Change(ByVal Target As Range)
    CommandButton1.Enabled = False
    CommandButton2.Enabled = False
    If Application.WorksheetFunction.CountA(Range("C:C")) > 0 Then
        CommandButton2.Enabled = True
    End If
    If Application.WorksheetFunction.CountA(Range("A:A")) > 0 Then
        CommandButton1.Enabled = True
    End If
End Sub

備註：在上述代碼中， CommandButton1和CommandButton2 是按鈕名稱，A:A和C:C 是用於啟用或禁用兩個按鈕的兩列，請根據需要進行更改。

3. 然後保存並關閉代碼窗口，現在，您將獲得所需的以下結果：

（1.）如果在A列中輸入數據，按鈕1啟用，按鈕2禁用，請參見截圖：

（2.）如果在C列中輸入數據，按鈕2啟用，按鈕1禁用，請參見截圖：

（3.）A列和C列都有數據時，兩個按鈕都啟用，請參見截圖：

（4.）如果A列和C列沒有數據，兩個按鈕都禁用，請參見截圖：

使用VBA代碼根據兩個單元格值啟用或禁用按鈕

如果您想根據兩個單元格值啟用或禁用命令按鈕，例如，當A1中的值大於B1中的值時，按鈕啟用，否則按鈕禁用。以下VBA代碼也可以為您提供幫助。

1. 右鍵單擊包含按鈕的工作表，然後從上下文菜單中選擇「檢視程式碼」，在Microsoft Visual Basic for Applications窗口中，請將以下代碼複製並粘貼到空白模塊中，請參見截圖：

VBA代碼：根據兩個單元格值啟用或禁用按鈕：

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim TargetAdd As String
    Dim xTemp As Double
    On Error GoTo ExitSub
    TargetAdd = Target.Address
    CommandButton1.Enabled = False
    If (TargetAdd = Range("A1").Address) Or (TargetAdd = Range("B1").Address) Then
        If Range("A1") > Range("B1") Then
            CommandButton1.Enabled = True
        End If
    End If
ExitSub:
End Sub

備註：在上述代碼中，A1和B1是您使用的單元格值，CommanButton1是按鈕名稱，請根據需要進行更改。

2. 然後保存並關閉代碼窗口，現在，如果A1中的單元格值大於B1，按鈕啟用，否則，如果A1中的單元格值小於B1，按鈕禁用，請參見截圖：