Makro İle Pivot Tablodan Listeye Geçiş

Bu dosya, satır ve sütun başlıklarından oluşan çapraz (özet) bir tabloyu, her değerin ayrı satırda yer aldığı düz bir listeye dönüştürür. Dönüşüm bir UserForm üzerinden yapılır; veri analizi, filtreleme veya yeni bir pivot tablo kurmak için uygun bir ham veri yapısı elde edilir.

Dosyanın içeriği​

• exceldestek.com | exceldepo.com: B2:F24 aralığında örnek özet tablo bulunur. Dönüşüm bu sayfadaki veriyle denenebilir.
• Module1: Formu açan ShowUserForm makrosunu içerir.
• UserForm1: Giriş ve çıktı aralığının seçildiği, tablo oluşturma seçeneğinin bulunduğu form ile dönüşüm kodunu içerir.

Dosyada formül bulunmaz; tüm işlem makro ile yapılır.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem yoktur.

• ShowUserForm: UserForm1 formunu açar. Makro, Alt+F8 ile çalıştırılır.
• UserForm_Initialize: Form açılırken, etkin hücrenin bulunduğu bitişik veri bölgesinin adresini giriş alanına yazar.
• OKButton_Click: Giriş ve çıktı aralığını doğrular. Aralık geçersizse veya seçilen alan tek hücre ya da 3 satırdan azsa uyarı verir ve işlemi durdurur. Doğrulama başarılıysa ReversePivot çalıştırılır ve form kapanır.
• ReversePivot: Çıktı aralığının başına Column1, Column2, Column3 başlıklarını yazar. Özet tablonun ilk sütunundaki satır etiketini, ilk satırdaki sütun başlığını ve kesişimdeki değeri sırayla üç sütuna aktarır. Değerlerin sayı biçimi korunur. Seçenek işaretliyse sonuç Excel tablosuna (ListObject) çevrilir.
• CancelButton_Click: Formu işlem yapmadan kapatır.

Nasıl kullanılır​

1. Dosyayı açıp makroları etkinleştirin.
2. Dönüştürülecek özet tablonun içindeki bir hücreyi seçin. İlk sütun satır etiketlerini, ilk satır sütun başlıklarını içermelidir.
3. Alt+F8 ile ShowUserForm makrosunu çalıştırın.
4. Formdaki giriş alanında özet tablonun adresini kontrol edin; gerekirse değiştirin.
5. Çıktı alanında listenin yazılacağı ilk hücreyi seçin.
6. İsterseniz tablo oluşturma seçeneğini işaretleyin ve OK düğmesine basın.
7. Liste, çıktı aralığından itibaren üç sütun halinde oluşturulur; Column1, Column2 ve Column3 başlıkları ihtiyaca göre yeniden adlandırılır.