Çift tık ile "VAR" ya da "YOK" yazdırma

[Yesilyurtlu]

Değerli uzmanlarım;
Yanlış hatırlamıyorsam Evren abi yardımcı olmuştu ama şimdi o kodu kaybettim bulamıyorum .

Aralığı kendim belirleyeceğim şekilde Birinci çift tıklama da "VAR" ikinci çift tıklama da "YOK" üçüncüsünde boş yapacak şekilde koda ihtiyacım var.
Yardımcı olabilir misiniz?

Örneğin C2:H15 aralığında

 

[Ömer]

Merhaba,

Çalışma sayfasının kod bölümüne kopyalayınız..

Private Sub Worksheet_BeforeDoubleClick(ByVal _
Target As Range, Cancel As Boolean)
If Intersect(Target, [C2:H15]) Is Nothing Then Exit Sub
If Target = "" Then
    Target = "Var"
ElseIf Target = "Var" Then
    Target = "Yok"
ElseIf Target = "Yok" Then
    Target = ""
End If
End Sub

.

 

[Yesilyurtlu]

Ömer Abi Eline Sağlık Teşekkür Ederim.
İstediğim gibi olmuş. Allah razı olsun.

=İNDİS(Sayfa1!G2:G100;'ALINDI BELGESİ'!L1&";"&İNDİS(Sayfa1!F2:F100;'ALINDI BELGESİ'!L1&""))

Bu formülümde #DEĞER! hatası var. Yanlışımı düzeltebilir misin abi

 

[İhsan Tank]

Ömer Abi Eline Sağlık Teşekkür Ederim.
İstediğim gibi olmuş. Allah razı olsun.

=İNDİS(Sayfa1!G2:G100;'ALINDI BELGESİ'!L1&";"&İNDİS(Sayfa1!F2:F100;'ALINDI BELGESİ'!L1&""))

Bu formülümde #DEĞER! hatası var. Yanlışımı düzeltebilir misin abi

merhaba
sorunuzu başka bir konu başlığı altında örnek dosya ile sorarsanız daha iyi olur

 

[Ömer]

Bu formülde ne yapmak istediğinizi anlayamadım..

.

 

[Yesilyurtlu]

Ömer Abi
G2:G100 sütunun da Belediye adı
F2:F100 sütunun da mahalle adı var

Bunları a belediyesi - B Mahallesi olarak birleştirmek istedim ama beceremedim

 

[Ömer]

Bu şekilde yorum yapmam tahmini olur.

Fonksiyonlar bölümüne yeni bir konu açarak açarak dosya eşliğinde açıklarsanız sevinirim.

.