Excel'de hücre değerine göre düğmeyi nasıl etkinleştirebilir veya devre dışı bırakabilirim?

Bu makalede, Excel çalışma sayfasında hücre değerine göre düğmeyi etkinleştirme veya devre dışı bırakma yöntemlerinden bahsedeceğim.

VBA kodu ile iki sütun verisine göre iki düğmeyi etkinleştirme veya devre dışı bırakma

VBA kodu ile iki hücre değerine göre bir düğmeyi etkinleştirme veya devre dışı bırakma

VBA kodu ile iki sütun verisine göre iki düğmeyi etkinleştirme veya devre dışı bırakma

Örneğin, bir çalışma sayfasında iki komut düğmem var. Eğer Sütun A'da veri varsa, düğme1 etkinleştirilir ve düğme2 devre dışı bırakılır; eğer Sütun C'de veri varsa, düğme2 etkinleştirilir ve düğme1 devre dışı bırakılır. Bu görevi çözmek için aşağıdaki VBA kodu size yardımcı olabilir.

1. Düğmeleri içeren sayfaya sağ tıklayın ve ardından bağlam menüsünden Görünüm Kodu seçeneğini seçin, ekran görüntüsüne bakın:

2. Microsoft Visual Basic for Applications penceresinde lütfen aşağıdaki kodu boş modüle kopyalayıp yapıştırın:

VBA kodu: İki sütuna göre iki düğmeyi etkinleştirme veya devre dışı bırakma:

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

Not: Yukarıdaki kodda, CommandButton1 ve CommandButton2 düğme adları, A:A ve C:C ise iki düğmeyi etkinleştirmek veya devre dışı bırakmak için kullandığınız iki sütundur, lütfen bunları ihtiyaçlarınıza göre değiştirin.

3. Ardından kod penceresini kaydedip kapatın, şimdi ihtiyacınız olan aşağıdaki sonucu elde edeceksiniz:

(1.) Eğer Sütun A'ya veri girerseniz, düğme 1 etkinleştirilir ve düğme 2 devre dışı bırakılır, ekran görüntüsüne bakın:

(2.) Eğer Sütun C'ye veri girerseniz, düğme 2 etkinleştirilir ve düğme 1 devre dışı bırakılır, ekran görüntüsüne bakın:

(3.) Hem Sütun A hem de Sütun C'de veri varsa, iki düğme de etkinleştirilir, ekran görüntüsüne bakın:

(4.) Eğer Sütun A ve Sütun C'de hiç veri yoksa, iki düğme de devre dışı bırakılır, ekran görüntüsüne bakın:

VBA kodu ile iki hücre değerine göre bir düğmeyi etkinleştirme veya devre dışı bırakma

Eğer iki hücre değerine göre bir komut düğmesini etkinleştirmek veya devre dışı bırakmak istiyorsanız, örneğin, A1'deki değer B1'deki değerden büyükse düğme etkinleştirilir, aksi takdirde düğme devre dışı bırakılır. Aşağıdaki VBA kodu da size yardımcı olabilir.

1. Düğmeyi içeren sayfaya sağ tıklayın ve ardından bağlam menüsünden Görünüm Kodu seçeneğini seçin, Microsoft Visual Basic for Applications penceresinde lütfen aşağıdaki kodu boş modüle kopyalayıp yapıştırın, ekran görüntüsüne bakın:

VBA kodu: İki hücre değerine göre bir düğmeyi etkinleştirme veya devre dışı bırakma:

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

Not: Yukarıdaki kodda, A1 ve B1 sizin kullandığınız hücre değerleri, CommanButton1 ise düğme adıdır, bunları kendi bilgilerinizle değiştirin.

2. Ardından kod penceresini kaydedip kapatın, şimdi eğer A1'deki hücre değeri B1'den büyükse düğme etkinleştirilir, aksi takdirde eğer A1'deki hücre değeri B1'den küçükse düğme devre dışı bırakılır, ekran görüntüsüne bakın: