Çözüldü Kod Yardımı

cavanoos

Altın Üye
Katılım
17 Aralık 2008
Mesajlar
770
Excel Vers. ve Dili
Microsoft 365
Altın Üyelik Bitiş Tarihi
11-01-2026
Merhaba arkadaşlar;

Alttaki kodda Z (ZVAL) hücresinde 1 varsa ise işlem yapar, sıfır ise yapmaz.
Benim yapmak istediğim ise hücre boş ise işlem yapmasın.
Yani ZVAL= 0 değilde ZVAL = boş
Kodu bu şekilde düzenleyebilir misiniz ?

ElseIf Not IsError(Application.Match(EVal, listZ, 0)) And (ZVal = 0 Or AVal > 0 Or BVal > 0) Then
ws.Cells(k, "L").Interior.Color = vbYellow
 

mustafa1205

Altın Üye
Katılım
23 Ekim 2010
Mesajlar
1,382
Excel Vers. ve Dili
Office 2016 / 64 Bit - Türkçe
Altın Üyelik Bitiş Tarihi
18-07-2026
ElseIf Not IsError(Application.Match(EVal, listZ, 0)) _
And (IsEmpty(ZVal) Or ZVal = "" Or AVal > 0 Or BVal > 0) Then
ws.Cells(k, "L").Interior.Color = vbYellow


Deneyiniz...
 

cavanoos

Altın Üye
Katılım
17 Aralık 2008
Mesajlar
770
Excel Vers. ve Dili
Microsoft 365
Altın Üyelik Bitiş Tarihi
11-01-2026
Mustafa1205;

İlginiz için teşekkür ederim ama kod çalışmadı.
Fakat sorun kodun başka bir satırında imiş, çözüldü.
 
Üst