• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Özet tablo yardım

Katılım
3 Nisan 2014
Mesajlar
395
Excel Vers. ve Dili
Excel 2019 - Türkçe
Merhaba,

Netsisten sql ile rapor çekip bir özet tablo oluşturduk, bu rapora bazı formüller ekleyerek kar, kar yüzdesi falan ekledik. Yüzdeleri büyükten küçüğe sıralamak istiyorum fakat özet tabloya bağlı olduğu için sıralama yapamıyorum. Nasıl yapabilirim?. Fikirlerinize ihtiyacım var, şimdiden teşekkürler
 

Ekli dosyalar

Son düzenleme:
Merhaba.

Sanırım istediğiniz ekli belgedeki gibi birşey.

O sütunu kod tarafından kullanılıyor, O sütununa veri yazmayınız.
O4 hücresinden, sıralama yöntemini seçmeniz yeterli olacaktır.
.
 

Ekli dosyalar

Üstad dosyayı inceledim tam tam istediğim gibi olmuş, çok teşekkür ederim.

Ben kendi orijinal dosyama uyarlayıp geri dönüş yapacağım. Ekstra bir sorum daha olabilir, ekleyip soracağım, yardımlarınızı bekliyorum. Tekrar teşekkürler.
 
Merhaba,

Özet tabloma bunu uyarlayıp çalıştırınca, resimdeki uyarıyı veriyor.

http://hizliresim.com/LQy37V



Run dedikten sonra da aşağıdaki hatayı alıyorum.

http://hizliresim.com/9GQLXo



Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [S13]) Is Nothing Then Exit Sub
Call sırala
End Sub

Sub sırala()
Application.ScreenUpdating = False: Application.Calculation = xlCalculationManual
[S13] = "KRİTER"
With Range("S14:S" & [C65536].End(3).Row)
    .Formula = "=IF(R14="""",S15,1+COUNTIF($R$14:$R$" & [C65536].End(3).Row & ","">""&R14)-ROW()/1000)"
    .Calculate
    .Value = .Value
End With
If [S12] = "ARTAN" Then
Range("A14:S" & [C65536].End(3).Row).Sort Range("S13"), xlAscending
Else
Range("A14:S" & [C65536].End(3).Row).Sort Range("S13"), xlDescending
End If
Range("S13:S" & [C65536].End(3).Row).ClearContents
Application.ScreenUpdating = True: Application.Calculation = xlCalculationAutomatic

End Sub
 
Tekrar merhaba.

Gerçek belgenizin bir örneğini paylaşırsanız bakayım.
Ya da "özet tablo sıralama" şeklinde araştırma yapmanızı öneririm.
.
 
Geri
Üst