Makronun belirli hücreler seçildiğinde çalışması.

[ycimen]

Kullandığım bir makronun bağlı olduğu butonun sadece istediğim hücerlerden biri seçili ise görünmesini, değilse görünmemesini ( yada makronun çalışmamasını nasıl sağlarım. Teşekküler.

 

[N.Ziya Hiçdurmaz]

yanıt

Private Sub CommandButton1_Click()
MsgBox "olumlu"
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("b7:b14,d7:d12")) Is Nothing Then Exit Sub
Call CommandButton1_Click
End Sub

 

[Necdet]

Merhaba,

Butonun görünüp görünmemesine örnek, aşağıdaki kodları sayfanın kod bölümüne kopyalayınız.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, [B7:B14, D7:D14]) Is Nothing Then
    CommandButton1.Visible = False
    Exit Sub
End If
CommandButton1.Visible = True
End Sub

 

[ycimen]

Değerli vaktinizi ayırıp verdiğiniz cevaplar için her ikinize de ayrı ayrı teşekkür ederim. Sorunumu sayenizde kısa zamanda halletmiş oldum.