ikili koşul

[mahmutozdemir]

eğer a2 1 ise b1 de veri varsa b2 x koysun. Eğer a2 1 ise b1 de veri yoksa b2 x koymasın

 

[alptun20]

Aşağıdaki kodu denermisiniz.

Not: kod belki olması gerekenden uzun veya zor yoldan yazılmış olabilir. Mazur görün kod yazmaya yeni başladım.

Sub Deneme()
If Range("a2").Value = "1" And Range("b1").Value = "" Then
Range("b2").Value = ""
Else
Range("b2").Value = "x"
End If
End Sub

Edit: bugün ben basitte olsa bazı sorulara cevap verebiliyor ve basit mantıkla kod yazabiliyorsam, bunda başta Evren Gizlen abim olmak üzere bütün forum üyelerinin payı büyüktür. Hepsine teşekkürü bir borç biliyorum. Saygılarımla..

 

[Mahir64]

Merhaba
Bu şekilde deneyin

=EĞER(VE(A2=1;B1>0);"x";"")

 

[Mahir64]

Sayın alptun20
yazdığın kodu sayfanın kod bölümü için

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("a2").Value = "1" And Range("b1").Value = "" Then
Range("b2").Value = ""
Else
Range("b2").Value = "x"
End If
End Sub

Bu şekilde değiştirsek sanırım daha kullanışlı olacaktır. Kişi herdefasında buton tıklamak yerine sayfayı seçtiği anda formül misalı çalışır.

 

[alptun20]

Sayın alptun20
yazdığın kodu sayfanın kod bölümü için

Bu şekilde değiştirsek sanırım daha kullanışlı olacaktır. Kişi herdefasında buton tıklamak yerine sayfayı seçtiği anda formül misalı çalışır.

Teşekkür ederim. Dediğim gibi daha yeni kod yazmaya başladım. Bazı eksikliklerimiz olacak. Bu dediğinizide öğrenmiş oldum böylelikle. İyi geceler.

Saygılarımla..

 

[mahmutozdemir]

=EĞER(VE(A2=1;B1>0);"x";"") işimi gördü ilginiz içim teşekkürler ...

 

[Mahir64]

=EĞER(VE(A2=1;B1>0);"x";"") işimi gördü ilginiz içim teşekkürler ...

Kolay gelsin
İyi geceler :hey:

 

[mahmutozdemir]

Sizede iyi geceler

 

[mahmutozdemir]

slm,
performans sayfasında =EĞER(VE(A2=1;B1>0);"x";"") formulune göre b1 boş ancak yinede x var.

 

[İhsan Tank]

slm,
performans sayfasında =EĞER(VE(A2=1;B1>0);"x";"") formulune göre b1 boş ancak yinede x var.

merhaba

=EĞER(YADA($U$8="";$D11="");"";EĞER(VE(D11=1;$U$8>0);"x";""))

bu formülü kullansanız

 

[mahmutozdemir]

Teşekkürler

 

[İhsan Tank]

Teşekkürler

rica ederim
iyi çalışmalar :yazici: