Excel'de birden fazla Alan Ayarları'nı nasıl değiştirebilirsiniz?
Bir çalışma sayfasında bir PivotTable oluşturduğunuzda, alanları PivotTablo Alan Listesi’nden Değerler listesine sürükledikten sonra aşağıdaki ekran görüntüsünde gösterildiği gibi tüm alanlar özet işlevi olarak aynı Say işlevini alabilir. Ancak şimdi Toplam işlevini kullanarak Say işlevini tek seferde değiştirmek istiyorsunuz. Excel’de birden fazla PivotTable alanının hesaplama yöntemini aynı anda nasıl değiştirebilirsiniz?
Alan Ayarları'yi PivotTable içinde tek tek elle değiştirin
Birden fazla Alan Ayarları'i PivotTable içinde VBA koduyla değiştirin
Alan Ayarları'yi PivotTable içinde tek tek elle değiştirin
Excel'de, Alan Ayarları'nin hesaplamasını Değer Alan Ayarlarıiletişim kutusunda işlevi tek tek değiştirerek yapabilirsiniz; bunu şu şekilde yapın:
1. PivotTable içinde özet işlevini değiştirmek istediğiniz Değerler alanındaki bir alanı seçin, sağ tıklayın ve Değer Alan Ayarları seçeneğini belirleyin; ekran görüntüsüne bakın:
2. Ardından, Değer Alan Ayarları iletişim kutusunda, Değeri Özetleme Ölçütü sekmesinin altında kullanmak istediğiniz hesaplama türünü seçin; ekran görüntüsüne bakın:
3. Ardından bu iletişim kutusunu kapatmak için Tamam düğmesine tıklayın; Say işlevinizin Toplam işlevine dönüştüğünü göreceksiniz—ekran görüntüsüne bakın:
4. Diğer alanların hesaplama ayarlarını değiştirmek için yukarıdaki adımları tekrarlayın.
Not: Ayrıca, bir alan hücresine sağ tıklayıp bağlam menüsünden ihtiyacınız olan hesabı seçerek ve Değerleri Özetleme Ölçütü seçeneğini kullanarak Alan Ayarları’nı değiştirebilirsiniz.
Birden fazla Alan Ayarları'i PivotTable içinde VBA koduyla değiştirin
Yukarıdaki yöntem, değiştirilmesi gereken çok sayıda alan hesaplaması olduğunda zaman alıcı ve yorucu hale gelebilir. Bu yüzden, birden fazla alan ayarını aynı anda değiştirmenize yardımcı olacak bir kod paylaşacağım.
1. PivotTable'daki herhangi bir hücreye tıklayın.
2. ALT + F11 tuşlarına basılı tutun; bu işlem, Microsoft Visual Basic for Applications penceresini açar.
3. Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodu Modül Penceresi’ne yapıştırın.
VBA kodu: Birden fazla Alan Ayarları'i PivotTable içinde değiştirme
Public Sub SetDataFieldsToSum()
'Update 20141127
Dim xPF As PivotField
Dim WorkRng As Range
Set WorkRng = Application.Selection
With WorkRng.PivotTable
.ManualUpdate = True
For Each xPF In .DataFields
With xPF
.Function = xlSum
.NumberFormat = "#,##0"
End With
Next
.ManualUpdate = False
End With
End Sub
4. Ardından bu kodu çalıştırmak için F5 tuşuna basın; seçili PivotTable'nizdeki tüm Alan Ayarları, ihtiyaç duyduğunuz hesaplamaya tek seferde dönüştürülecektir. Ekran görüntülerine bakın:
|
 |
 |
Not: Yukarıdaki kodda Toplam işlevini, Ortalama, Maksimum veya Minimum gibi istediğiniz başka bir hesaplama türüyle değiştirebilirsiniz. Bunun için yalnızca aşağıdaki satırlardaki Toplam ifadesini güncellemeniz yeterlidir:Public Sub SetDataFieldsToSum() ve .Function = xlSum satırlarını ilgili işlevlerle değiştirin.
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar