Bubble Grafik Örneği

Bu dosya, Excel'de bubble (kabarcık) grafiğinin seri bilgilerinin VBA ile nasıl okunduğunu ve grafik veri aralığının makroyla nasıl değiştirildiğini gösteren bir örnektir. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Demo1: A1:C13 aralığında bubble grafiğin verisi bulunur. C sütununda Size başlığı altında kabarcık boyutları (1, 4, 8, 11, 13, 22, 31, 24, 18 gibi) yer alır; X değerleri bir dizi olarak grafik serisine tanımlıdır.
• Demo2: A1:D13 aralığında Jan-Dec ayları A sütununda, Sprockets serisinin değerleri C sütununda (71, 69, 70, 73, 79, 90 vb.) listelenir.
• Dosyada iki grafik bulunur; Demo1 ve Demo2 sayfalarındaki makrolar etkin sayfadaki ilk grafik üzerinde çalışır.

Çalışma sayfalarında formül yoktur; örnek veriler doğrudan hücrelere yazılmıştır.

Makrolar​

Kod üç modülde toplanmıştır. Makrolar dosya silme veya dışarıya bağlantı gibi işlem yapmaz.

• Module1: Bir grafik serisinin SERIES formülünü çözümleyen işlevleri içerir. SERIESNAME_FROM_SERIES, XVALUES_FROM_SERIES, VALUES_FROM_SERIES ve BUBBLESIZE_FROM_SERIES sırasıyla seri adını, X değerlerini, Y değerlerini ve kabarcık boyutunu döndürür. Her biri iki öğeli bir sonuç verir: veri türü (Range, Array, String veya Empty) ve adres ya da içerik. Hepsi yardımcı SERIESFUNC işlevini kullanır.
• ModDemo1 içindeki ShowSeriesInfo: Etkin sayfadaki ilk grafiğin ilk serisinin adını, X değerlerini, değerlerini ve kabarcık boyutunu ayrı mesaj kutularında gösterir.
• modDemo2 içindeki ContractAllSeries: Grafikteki tüm serilerin X ve değer aralıklarını bir satır kısaltır.
• modDemo2 içindeki ExpandAllSeries: Aynı aralıkları bir satır uzatır.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Demo1 veya Demo2 sayfasına geçerek grafiği inceleyin.
3. Alt+F8 ile makro listesini açın ve ShowSeriesInfo makrosunu çalıştırarak serinin kaynak bilgilerini görün.
4. Grafik aralığını değiştirmek için ExpandAllSeries ile bir satır ekleyin, ContractAllSeries ile bir satır çıkarın.
5. Kendi grafiğinizde kullanmak için Module1'deki işlevleri çalışma kitabınıza kopyalayın.