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

本文，我將討論一些基於Excel工作表中的單元格值啟用或禁用按鈕的方法。

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

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

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

例如，我在工作表中有兩個命令按鈕，如果A列中有數據，則button1為啟用，而button 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

備註：在上面的代碼中， 命令按鈕 1 命令按鈕 2 是按鈕名稱， 答： 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 是您使用的儲存格值， 命令按鈕1 是按鈕名稱，將其更改為您自己的。

2。 然後儲存並關閉程式碼窗口，現在，如果A1中的儲存格值大於B1，則啟用該按鈕，否則，如果A1中的儲存格值小於B1，則停用該按鈕，請參見截圖：