0 (sıfır) değerler grafikte görünmesin

magnesia

Yasaklı üye
Katılım
1 Ocak 2018
Mesajlar
351
Excel Vers. ve Dili
Excel 2010 Türkçe
Arkadaşlar selam.
Ekteki dosyada görüleceği üzere, "C" sütunundaki değer -0- (sıfır) ise bu verinin grafikte görünmemesini sağlayabilir miyim?
Şimdiden teşekkürler.
 

Ekli dosyalar

Muzaffer Ali

Destek Ekibi
Destek Ekibi
Katılım
5 Haziran 2006
Mesajlar
5,803
Excel Vers. ve Dili
2019 Türkçe
Merhaba.
Listenize filtre uygulayıp "0" ların görünmesini engellerseniz grafikte de görünmez.
 

magnesia

Yasaklı üye
Katılım
1 Ocak 2018
Mesajlar
351
Excel Vers. ve Dili
Excel 2010 Türkçe
Sayın dalgalikur.
Öncelikle ilginize ve emeğinize teşekkür ederim.
O çözümü biliyordum. Ancak, ben dosyanın kısa halini yolladım. Dosyanın A ve B sütunlarındaki veriler başka yerden formülle geliyor..
Verdiğiniz çözümün dışında bir çözüm bana daha uygun. (Varsa tabii ki..)
Tekrar teşekkürler.
 

tamer42

Destek Ekibi
Destek Ekibi
Katılım
11 Mart 2005
Mesajlar
2,945
Excel Vers. ve Dili
Office 2013 İngilizce
Sayın dalgalikur.
Öncelikle ilginize ve emeğinize teşekkür ederim.
O çözümü biliyordum. Ancak, ben dosyanın kısa halini yolladım. Dosyanın A ve B sütunlarındaki veriler başka yerden formülle geliyor..
Verdiğiniz çözümün dışında bir çözüm bana daha uygun. (Varsa tabii ki..)
Tekrar teşekkürler.
Ekli dosyayı inceler misin, umarım işini görür....
 

Ekli dosyalar

magnesia

Yasaklı üye
Katılım
1 Ocak 2018
Mesajlar
351
Excel Vers. ve Dili
Excel 2010 Türkçe
Sayın tamer42.
İşlem tamam.. İlginize ve emeğinize teşekkür ederim.
Ek bir sorum olacak.
Bu tabloyu;

Private Sub Worksheet_Activate()
Range("A2: D" & [A36].End(3).Row).Sort Key1:=Cells(1, "D")
End Sub

kodlarıyla, D sütunu baz alınarak, BÜYÜKTEN KÜÇÜĞE sıralatmak istiyorum fakat küçükten büyüğe sıralıyor.

Sub sirala()
Range("A2: D" & Range("B36").End(3).Row).Sort Key1:=Range("D2"), Order1:=xlDescending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal
End Sub

kodlarıyla isteğim oluyor fakat bu sefer de listenin sonundaki #YOK yazılı satırlar en başa geliyor.
Bu #YOK uyarılarının görünmemesi için ne yapabilirim?
 
Son düzenleme:

tamer42

Destek Ekibi
Destek Ekibi
Katılım
11 Mart 2005
Mesajlar
2,945
Excel Vers. ve Dili
Office 2013 İngilizce
Sayın tamer42.
İşlem tamam.. İlginize ve emeğinize teşekkür ederim.
Ek bir sorum olacak.
Bu tabloyu;

Private Sub Worksheet_Activate()
Range("A2: D" & [A36].End(3).Row).Sort Key1:=Cells(1, "D")
End Sub

kodlarıyla, D sütunu baz alınarak, BÜYÜKTEN KÜÇÜĞE sıralatmak istiyorum fakat küçükten büyüğe sıralıyor.

Sub sirala()
Range("A2: D" & Range("B36").End(3).Row).Sort Key1:=Range("D2"), Order1:=xlDescending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal
End Sub

kodlarıyla isteğim oluyor fakat bu sefer de listenin sonundaki #YOK yazılı satırlar en başa geliyor.
Bu #YOK uyarılarının görünmemesi için ne yapabilirim?

Bu konuda diğer Üstadlar yardımcı olabilir diye düşünüyorum
 

magnesia

Yasaklı üye
Katılım
1 Ocak 2018
Mesajlar
351
Excel Vers. ve Dili
Excel 2010 Türkçe
Sayın tamer42.
Sakın yanlış anlamayın lütfen.. "Diğer üstadlar" derken??
 

tamer42

Destek Ekibi
Destek Ekibi
Katılım
11 Mart 2005
Mesajlar
2,945
Excel Vers. ve Dili
Office 2013 İngilizce

İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,104
Excel Vers. ve Dili
Excel, 365 - İngilizce
.

Aşağıdaki makro ile veriler büyükten küçüğe sıralanır.

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)

Range("A1:C20").Sort Key1:=Range("C2"), Order1:=xlDescending, Header:= _
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal

Range("A1").Select
ActiveCell.Offset(1, 0).Select
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Select
Loop

End Sub
Aşağıdaki dinamik alanlarla grafik 0'ları dikkate almaz.


Kod:
veri    =OFFSET('En çok DÖF açılan bölümler'!$C$2;0;0;COUNTIF('En çok DÖF açılan bölümler'!$C$2:$C$20;">0");1)
xetiket    =OFFSET('En çok DÖF açılan bölümler'!$A$2;0;0;COUNTIF('En çok DÖF açılan bölümler'!$C$2:$C$20;">0");1)
Dosyanız ekte.


.
 

Ekli dosyalar

magnesia

Yasaklı üye
Katılım
1 Ocak 2018
Mesajlar
351
Excel Vers. ve Dili
Excel 2010 Türkçe
Sayın İdris Serdar.
Öncelikle ilginize ve emeğinize teşekkür ederim.
Büyükten küçüğe sıralama sorunsuz çalıştı. Ancak, sıfırları görmeyen kodlar çalışmıyor. Satırların ikisi de kırmızıya boyanıyor. Ukalalığımı bağışlayın lütfen ama sanırım parantezlerde bir sorun var.
 
Son düzenleme:

İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,104
Excel Vers. ve Dili
Excel, 365 - İngilizce
.

Onlar VBA kodu değil. Dinamik alan tanımlamada kullanılan formüllerdir.

.
 

magnesia

Yasaklı üye
Katılım
1 Ocak 2018
Mesajlar
351
Excel Vers. ve Dili
Excel 2010 Türkçe
Onu nerede, nasıl kullanılacağını bilmiyorum.
 

İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,104
Excel Vers. ve Dili
Excel, 365 - İngilizce
.

Eklediğim dosyada, Formüller > Ad yöneticisine bakarsanız orada formülleri görürsünüz.

.
 

magnesia

Yasaklı üye
Katılım
1 Ocak 2018
Mesajlar
351
Excel Vers. ve Dili
Excel 2010 Türkçe
Tamamdır sayın İdris Serdar. Şu an bilgisayar başında değilim. Sonuçtan mutlaka haber veririm.
Tekrar tekrar teşekkürler.
 

magnesia

Yasaklı üye
Katılım
1 Ocak 2018
Mesajlar
351
Excel Vers. ve Dili
Excel 2010 Türkçe
Sayın İdris Serdar.
İşlem tamam..
Teşekkür ederim.
 
Üst