Как включить или отключить кнопку на основе значения ячейки в Excel?

В этой статье я расскажу о некоторых методах включения или отключения кнопки в зависимости от значения ячейки на листе Excel.

Включение или отключение двух кнопок на основе данных двух столбцов с кодом VBA

Включение или отключение кнопки на основе значений двух ячеек с кодом VBA

Включение или отключение двух кнопок на основе данных двух столбцов с кодом VBA

Например, у меня есть две командные кнопки на листе, если в столбце A есть данные, кнопка 1 включена, а кнопка 2 отключена; если столбец C содержит данные, кнопка 2 включена, а кнопка 1 отключена. Для решения этой задачи вам может помочь следующий код VBA.

1. Щелкните правой кнопкой мыши лист, содержащий кнопки, и выберите Просмотреть код из контекстного меню см. снимок экрана:

2. В Microsoft Visual Basic для приложений окна, скопируйте и вставьте приведенный ниже код в пустой модуль:

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

Код 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, кнопка отключена, см. Снимок экрана: