Как включить или отключить кнопку на основе значения ячейки в 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, кнопка отключена, см. скриншот: