FORMÜL SONUCUNDA Kİ SIFIRI FARKLI GÖSTERME

[yamahato]

Merhaba ustalarım.
Excelde ki bir hücremizde ki formülü aşağıda yazdım.
=EĞERHATA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246);0)
Bu formülle giren ürün sayfasında ki bir değeri alıyorum.

Sorum şu eğer aradığım değer giren ürün sayfasında yoksa yada c hücresinde değer yoksa formülle değer yazılacak olan excel hücremde 0 olarak görüntüleniyor.

Aşağıda sıfır gözükmemesi için bulduğum formülü yukarıda hücremde yazan formülle nasıl birleştirebilirim. Kısacası formül yazdığım hücrede değer 0 olacaksa sıfır yazmasın onun yerine hiç alım yapılmamış yada başka seçeceğim bir metin yazsın.
EĞER(Y2-Y15246=0,”HİÇ ALIM YAPILMAMIŞ”,Y2-Y15246)

 

[ÖmerFaruk]

Formülle uğraşmadan hücre biçimlendirme ile yapabilirsiniz
Hücre formatınızı isteğe uyarlanmış
0;0;"HİÇ ALIM YAPILMAMIŞ"

Birinci Sıfır: Pozitif sayılardaki format
İkinci Sıfır: Negatif Sayılardaki format
Son kısım: Sıfır olduğundaki format

Formülüz Sıfır sonucu ARA fonksiyonu sonucunda sıfır üretmiyor, EğerHata fonksiyonu sonucu Sıfır geliyorsa en sondaki sıfırı değiştirin
=EĞERHATA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246);"")

 

[yamahato]

Formülle uğraşmadan hücre biçimlendirme ile yapabilirsiniz
Hücre formatınızı isteğe uyarlanmış
0;0;"HİÇ ALIM YAPILMAMIŞ"

Birinci Sıfır: Pozitif sayılardaki format
İkinci Sıfır: Negatif Sayılardaki format
Son kısım: Sıfır olduğundaki format

Formülüz Sıfır sonucu ARA fonksiyonu sonucunda sıfır üretmiyor, EğerHata fonksiyonu sonucu Sıfır geliyorsa en sondaki sıfırı değiştirin
=EĞERHATA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246);"")

Birinci öneriniz çalıştı ama 2. önerinizde "" arasına hiç alım yapılmamış yazdığımda sonuç çıkmıyor formül gözüküyor.

 

[ÖmerFaruk]

İkinci önerim zaten sizin kendi formülünüz.
Yukarıdaki yazdığım bana göre 2. öneriyi tekrar yazıyorum.
=EĞERHATA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246);"")

 

[yamahato]

İkinci önerim zaten sizin kendi formülünüz.
Yukarıdaki yazdığım bana göre 2. öneriyi tekrar yazıyorum.
=EĞERHATA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246);"")

Sayın hocam;
Evet sonu sıfırlı hali benim formülüm. Sonunda 0 olduğu içinde formülün aradığı yerde veri yoksa sıfır yazıyor. Sıfırı 1 yaparsan 1 gözüküyor 5 yaparsan da 5 gözüküyor. onu denedim.
Anlayamadığım ve kas kafalığım için özür dilerek soruyorum. Lütfen kusura bakmayın.
Peki excel sayfasında işe yarayan ilk öneriniz dışında (excelde işe yarıyor ama textbox ta gene 0 gözüküyor.) hem excelde hemde textbox'ta hiç alınmamış yazması için formülde gerekli değişikliği yani bak oğlum birebir bunu yazacaksın şeklinde yazarmısınız?
Bende benim formülümle karşılaştırarak anlayamadığım noktayı anlarım.

 

[ÖmerFaruk]

Türkçe formül yazdığınıza göre konuyu Excel sayfasındaki hücrelerde Sıfır gösterimi olarak algılıyorum.
TextBox dediğiniz Sayfa üzerinde mi Userformda mı?
Ve hem excel sayfanızda hem de TextBox da kullandığınız formül ve kodları ayrı ayrı belirtir misiniz?

 

[yamahato]

Türkçe formül yazdığınıza göre konuyu Excel sayfasındaki hücrelerde Sıfır gösterimi olarak algılıyorum.
TextBox dediğiniz Sayfa üzerinde mi Userformda mı?
Ve hem excel sayfanızda hem de TextBox da kullandığınız formül ve kodları ayrı ayrı belirtir misiniz?

Sayın hocam şöyle ki.
Userformumda bulunan bir textbox aşağıda ki kod ile stok isimli excel sayfamda ki Z sütunda arama yapıp formüle göre en son tarihte aldığı değeri bulup ekranda gösteriyor.
' *************** TextBox16 EN SON ALINAN FİRMA ***************
Set s1 = Sheets("STOK")
son = s1.Cells(Rows.Count, "B").End(3).Row
sat = WorksheetFunction.Match(ListBox1.Value, s1.Range("B1:B" & son), 0)
TextBox16.Text = s1.Cells(sat, "Z")

Stok isimli excel sayfamda ki Z hücrelerinin hepsinde aşağıda yazdığım kod var. Bu kod ile her Z hücresi kendi satırında ki B hücresinde ki değeri, Giren ürün isimli sayfada ki F sutunun da bulup, bulduğu hücrenin satırında ki C hücresinde ki, değeri Stok isimli excel sayfamda ki Z hücresinde gösteriyor.
=EĞERHATA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246);0)

Uzun lafın kısası hepsi bir bine bağlı. Stok isimli sayfada ki kod Giren ürün sayfasında bir değer bulamayınca formül gereği sıfır yazıyor. Dolayısıyla userformda ki textbokta sıfır yazıyor.

Yapmak istediğim şu hem Stok isimli sayfada ki Z hücresinde hem de userformum da ki textboxda değer bulunamadığı durumlarda 0 yerine HİÇ ALINMAMIŞ YAZMASI.

 

[Korhan Ayhan]

Deneyiniz.

=EĞER(YADA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246)=0;EHATALIYSA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246)));"HİÇ ALINMAMIŞ";ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246))

 

[yamahato]

=EĞER(YADA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246)=0;EHATALIYSA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246)));"HİÇ ALINMAMIŞ";ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246))

B1713 yazan 3 yerde ki 1713 yazısını, satırlara 3. satır için göre b3 4. satır için b4 seklinde 1790 a kadar değiştirdim.
formülün sonucu #yok (değer kullanılamaz) çıkıyor hocam.

 

[Korhan Ayhan]

Örnek dosyanız varsa bizde deneyebiliriz.

 

[ÖmerFaruk]

Excel sayfanızda ve kodlarınızda neden ve neler yaptığınızı yazarak anlatırken bazı anlatma/anlama bozuklukları oluyor.
Yine de mevcut sorunlarınızı aşağıdaki gibi çözebilirsiniz.

Z hücrenizde (sanırım Z sütununda bulunan hücrelerde demeye çalışıyorsunuz) aşağıdaki formülünüz varsa
=EĞERHATA(ARA(2;1/('GİREN ÜRÜN'!$F$2:$F$15246=B1713);'GİREN ÜRÜN'!$C$2:$C$15246);0)

ve formül Sıfır değerinin görülmesi konusu hariç olmak üzere doğru çalışıyorsa, siz önerdiğim 1. metodu yapın.
Z sütununda hücre biçimlendirmesini aşağıdaki gibi yapın. (Z sütununda farklı formata sahipolması gereken hücreler olup olmadığını bilmeden yazıyorum.)
0;-0;"HİÇ ALIM YAPILMAMIŞ"
Eğer pozitif ve/veya negatif sayılarınızda format binlik ve ondalık ayraçlar olsun istiyorsanız aşağıdaki gibi yapın.
#.##0,00;-#.##0,00;"HİÇ ALIM YAPILMAMIŞ"

Userform kısmında kullandığınız aşağıdaki koddan sonra ilave verdiğim satırı da yazın. TextBox16.Text yazmanıza da gerek olmaması lazım.

TextBox16 = s1.Cells(sat, "Z")
If TextBox16="" or TextBox16=0 then TextBox16="HİÇ ALIM YAPILMAMIŞ"

 

[yamahato]

If TextBox16="" or TextBox16=0 then TextBox16="HİÇ ALIM YAPILMAMIŞ"

EXCEL.jpg - 141 KB

İndir EXCEL

Dosyayı indir EXCEL

dosya.co

TEŞEKKÜR EDERİM HALLOLDU

 

[yamahato]

Örnek dosyanız varsa bizde deneyebiliriz.

Sayın hocam bazı özel veriler oluğu için dosyayı direk yükleyemem. İçini boşaltıp benzer verilerle doldurmam gerek. Eğer sizin içinde bir sıkıntı yoksa uzaktan bağlantı ile bağlanıp dosyayı inceleyebilirsiniz?

 

[Korhan Ayhan]

EXCEL.jpg - 141 KB

İndir EXCEL

Dosyayı indir EXCEL

dosya.co

TEŞEKKÜR EDERİM HALLOLDU

Sorunuz çözüldüğüne göre son bahsettiğiniz işleme bence gerek yok.

 

[yamahato]

Sorunuz çözüldüğüne göre son bahsettiğiniz işleme bence gerek yok.

Evet şu an sorunsuz çalışıyor ama sizin dosyamı görmenizi çok isterim. Çünkü uzman gözüyle inceleyerek gereksiz ve userformu boşuna yoracak kod satırlarım mutlaka bulacaksınızdır. Saygılar.

 

[Korhan Ayhan]

Mutlaka bahsettiğiniz şekilde kod blokları vardır. Ama benim buna ayıracak vaktim maalesef yok..

 

[yamahato]

Mutlaka bahsettiğiniz şekilde kod blokları vardır. Ama benim buna ayıracak vaktim maalesef yok..

Cevabınız olumsuz olsa da ilginiz ve cevap vermeniz bile benim için büyük şeref. Teşekkür ederim.